my @x = [qw(a b c)]; #@x has one element print "$_ @$_\n" for @x;