weniger Code durch for-Schleife??

[Patrick]

Hallo Frank!

Vielleicht so:

for (%Uhrzeit) {
  m/^(\d+?):.*/;
  $Total{$1}++;
}
print "Total der Besucher in der 13. Stunde: ", $Total{12};

Danke fuer die Hilfe, ist schon mal ein Ansatz, aber leider zaehlt Deine Methode sehr grosszuegig. Dadurch erhalte ich die doppelte Zahl an Page-Views ;-)

Hier quick&dirty der output beider Methoden anhand der 11. Stunde (10 bis 11 Uhr - wir haben alos noch etwas Zeit, bis sich da wieder was aendert *gg*):

http://www.atomic-eggs.com/cgi-bin/Uhrzeitentest.cgi

Und etwas Erklaerung fuer doofe braeuchte ich auch noch... Was ist "m":

m/^(\d+?):.*/

for (%Uhrzeit)
{
if ($_ =~ /^10:.*/)  # Alle um 10 Uhr (10:00:00 bis 10:59:59)
  { push (@Um10, $Uhrzeit{$_});
  }
}
map { $TotalUm10 +=$_;}@Um10;
print "Patricks Total der Besucher in der 11. Stunde: $TotalUm10<br><br><br>\n";

for (%Uhrzeit) {
  m/^(\d+?):.*/;
  $Total{$1}++;
}
print "Franks Total der Besucher in der 11. Stunde: ", $Total{10};

Patrick