1         2         3         4          
         1234567890123456789012345678901234567890123456789
perl -e 'open(F,'f');@f=<F>;pop@f;pop@f;print"$_"foreach@f'