Help for this page
perl -pe 'BEGIN{ $lines = 10 } last if $. > $lines' < file
perl -pe'$.>10&&last' file