perl -i.bak -ne 'if ($. < 32) { print } elsif ($. > 32) { print <>}' filename