Select Code to Download

use strict;
use warnings;
...
__END__

Did not find all needed search strings

#Search strings that must much - ARRAY form.
my @arrayOfSearchStrings = map { "[$_]" } 945850 .. 945852;
...
else {
    print "Found ALL SEARCH STRINGS required in ARRAY\n";
}