@a=qw/a b c/; print while <@a>