=========================================================== .___ __ __ _________________ __ __ __| _/|__|/ |_ / ___\_` __ \__ \ | | \/ __ | | \\_ __\ / /_/ > | \// __ \| | / /_/ | | || | \___ /|__| (____ /____/\____ | |__||__| /_____/ \/ \/ grep rough audit - static analysis tool v2.8 written by @Wireghoul =================================[justanotherhacker.com]=== libmatch-simple-perl-0.010/Makefile.PL-3- libmatch-simple-perl-0.010/Makefile.PL:4:my $EUMM = eval( $ExtUtils::MakeMaker::VERSION ); libmatch-simple-perl-0.010/Makefile.PL-5- ############################################## libmatch-simple-perl-0.010/t/03smart.t-115- ok( ($yn =~ /!/ xor $res), $test_name ) libmatch-simple-perl-0.010/t/03smart.t:116: or diag sprintf '%s ~~ %s', explain(eval($left), eval($right)); libmatch-simple-perl-0.010/t/03smart.t-117- } ############################################## libmatch-simple-perl-0.010/lib/match/simple.pm-37- libmatch-simple-perl-0.010/lib/match/simple.pm:38:eval($xs ? <<'XS' : <<'PP'); libmatch-simple-perl-0.010/lib/match/simple.pm-39- ############################################## libmatch-simple-perl-0.010/lib/match/smart.pm-38- $seen ||= {}; libmatch-simple-perl-0.010/lib/match/smart.pm:39: my $refb = refaddr($b); libmatch-simple-perl-0.010/lib/match/smart.pm:40: return refaddr($a)==$refb if $refb && $seen->{$refb}++; libmatch-simple-perl-0.010/lib/match/smart.pm-41-