Statement Perl

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