http://qs1969.pair.com?node_id=873366


in reply to how to read every 10 line from input text file ?

This is the modern way to open a file in perl:

open my $INFILE, '<', 'file.txt' or die "Couldn't open file.txt: $!";