print FILE join (" ", @$col), "\n";

##</code><code>##

print FILE join ("\t", @$col), "\n";