#!perl -lpa $_="@F"