perl -ne 'next if 0 == $. % 25; print' filename