print foreach @a if $a;