Nochmal Perl (aber dringend)

[Frank Schönmann]

hi!

@dat = <DAT>;

while(<DAT>){
  push(@dat,$_);
}

Warum das? <DAT> liefert in einem Listenkontext alle Zeilen von DAT zurück, im skalaren Kontext nur die jeweils nächste Zeile

bye, Frank!