# Test for presence of patterns in HTML file
if($pattern1)
{
  scrapImageTag(); # calls to remove image tags
}
else
{
  print "No tags matching this pattern within the HTML document.\n";
}


##</code><code>##

if ( grep /$pattern1/i, @htmlLines )