Select Code to Download

for (@reportnL[0..4]) {
  print "$_\n";
}

for ( 0 .. 4 )
{
    print qq{$reportnL[$_]\n};
}

print qq{$reportnL[$_]\n} for 0 .. 4;