#!perl -alp $_=$F[1]