Gast+2008-08-21 17:10:44--

Code: (dl )

@array=split;

Warum zu jedem Zeichen auftrennen?

Sollte es nicht besser

Code: (dl )

@array=split(/\s+/,$_);

lauten?

perldoc -f split

...
split /PATTERN/,EXPR
...
If EXPR is omitted, splits the $_ string. If PATTERN is also omitted, splits on whitespace (after skipping any leading whitespace).
...