Select Code to Download

#!/usr/bin/perl

...
    $. >= $start && $. <= $stop and print "$.: $_";
    }
close $fh;

$ perl extract.pl 5 8 extract.pl
5: use autodie;
...
7: sub usage
8: {
$

$ perl -wne'5..8 and print' extract.pl
use autodie;
...
sub usage
{
$