Select Code to Download

    perl -ne '$n=$.-1; open F, ">$n.txt" unless $n%5; print F' file
    
...
    10.txt
    ...

    perl -ne 'BEGIN{$s="file000"} open F, ">". $s++. ".txt" unless ($.
+-1)%5; print F' file

...
    file002.txt
    ...