$ perl -Mv5.14 -e'my @a = qw( d e f ); say for +@a'
d
e
f