perl -aF: -ple'$_=pop@F' in_file > out_file