perl -e 'while(<>){print if ($.>1);}' filename