perl -i -ne 'print if /1\.0/ .. eof' file