Help for this page

Select Code to Download

Select or download this

while (<DATA>) {
  push @ary,split;
...
__DATA__
one two three four
boop noop boop crep

Select or download this

push @ary,split while (<DATA>);
print joint " / ",@ary;