#!perl -lpaF $\.=$"x@F