Reulärer Ausdruck gesucht°!

[n.d. parker]

Moin,

Du musst zuerst die Logdatei zeilenweise einlesen und dann die Funktion split auf jede Zeile anwenden:
($datum, $uhrzeit, $rechner) = split(/ /, $_);

das geht (TIMTOWTDI) natuerlich auch schneller und huebscher ;)

while (<FILE>) {
  chomp;
  my ($datum, $uhrzeit, $rechner) = split; # siehe perldoc -f split [1]
}

Viele Gruesse,

n.d.p.

[1] http://www.perldoc.com/perl5.6/pod/func/split.html
Kurzfassung des relevanten Teils:

'split;' ohne Argumente ist gleich

split ' ' => $_;

' ' (ein space) ist ein spezieller Match auf /\s+/, der schneller ist und obendrein fuehrende spaces noch entfernt etc.