Help for this page
perl -e '@a = qw(a, b, c);map { print "$_\n"; } @a'
a, b, c
perl -e '@a = qw(a b c);map { print "$_\n"; } @a'
a b c