Help for this page
use strict; ... my $num = "34"; print "Found it!\n" if $num =~/[$z8]/;
Invalid [] range "6-3" in regex; marked by <-- HERE in m/[10-374,376-3 + <-- HERE 79,382-385,388-499,530-534,541-543,618,619,700-704,707-709] +/