@array = ( 'SecureQuery($_GET) b', 'QueryFiasd($_POST) g', '$_GET[\'fsdf\'] g', 'DFSD $_POST[\'zzxcf\'] g', 'Secure($_GET[\'ggg\']) b', ); foreach $str (@array){ if ($str !~ m/Secure/ig){ if($str =~ m/\$_\w{3,4}/ig){ print $str . "\n"; } } }