Mega Code Archive

 

Categories / Perl / Statement

 

From to

#!/usr/bin/perl use warnings; use strict; my $start = 2; my $end = 4; while (<>) {     ($. == $start)..($. == $end) and print "$.: $_"; }