in reply to How to Print Every Other Line
perl -ne 'print if (++$x)%2' file1 > file2 [download]
------------ :Wq Not an editor command: Wq [download]