perl -pi -e'$_ x=$.>1'