print $html_report <## print $html_report "$line\n" if $line =~ /search criteria 01/i;
## print $html_report "$line\n" if $line =~ /search criteria 01/i;