>perl -wMstrict -lE
"my @arr = qw{ one two three four };
 say for @arr[ 0 .. $#arr-1 ];
 say qq{@arr};
"
one
two
three
one two three four