$ perl -E 'say for map length, qw{x y z}'
1
1
1