$ cat myfile
1st line
2nd line
3rd line
$ perl -ni.bak -e 'next if /^2nd/; print;' myfile
$ cat myfile
1st line
3rd line
$ cat myfile.bak
1st line
2nd line
3rd line
$