Select Code to Download

$i = 2;
$j = 4;
print "$_\n" for ($i..$j);

2
3
4

# show lines 2 thru 4
while (<>) {
...
while (<>) {
  print if $i..$j
}