Help for this page
#!/usr/bin/perl use strict; ... } 1;
#!/usr/bin/perl use strict; ... print "Total found: $total2 \n";