perl -E '@arr=("a b",
    "c d",
    qw/e f g h a*/);
while (my $e = <@arr>) {
    say $e
}'
[download]

a
b
c
d
e
f
g
h
address.txt
address.txt~
analytic
ascii.htm
aux-no-lex.lst
[download]

PerlMonks lovingly hand-crafted by Tim Vroom.
PerlMonks was recently assimilated by The Perl Foundation.
Beefy Boxes and Bandwidth Generously Provided by pair Networks
Built with the Perl programming language.