#!perl -lna ++$#$_||print for@F