@field = qw(look at me now);
@field2 = qw(this is so neat);

local($\, $,) = ("\n", "\t");
print @field;    # first row
print @field2;   # second row

##</code><code>##

look	at	me	now
this	is	so	neat