perl -ne 'print if (++$x)%2' file1 > file2

##</code><code>##

------------
:Wq
Not an editor command: Wq