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