in reply to A simple foreach question

@list = split (' ', $ARGV[0]);  ## It should be in Command line argume
+nt

[download]

or 

@list = (split (' ', <STDIN>)));

[download]

In Section Seekers of Perl Wisdom