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