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

##</code><code>##

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

##</code><code>##

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