perl -i -ne"next if $.<100; print" file