in reply to Delete every n line

Using a one-liner:

perl -i.bk -ne 'print if ($. % 25 != 0)' file

Hope this helps

citromatik