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