str SecureQuery _GET if str SecureQuery Secure Query ig print

1
2
3
4
5
$str = "SecureQuery(\$_GET)";
if ($str =~ m/(SecureQuery|Secure|Query)\(\$_\w{3,4}\)/ig){
print $& . "\n";
}