perl -ni.bak -e "print if $line++;"