Help for this page
join(t, @F)
F=' ' # Enter a tab here. perl -F"$F" -i -wlne "munge(@F); print join('$F',@F);" file
perl -F"$F" -i -wlpe 'munge(@F); $_ = join("'$F'",@F);'