Select Code to Download

foreach ( @htmlLines ) {
          # do stuff with $_
}

for my $i (0..@htmlLines-1)
{
  print $htmlLines[$i];
}