Select Code to Download

C:\strawberry>perl -nE "say $." README.txt | head
1
...
10

C:\strawberry>

# @ARGV may have more than one file in it

...
continue {
    close ARGV if eof;
}