=========================================================== .___ __ __ _________________ __ __ __| _/|__|/ |_ / ___\_` __ \__ \ | | \/ __ | | \\_ __\ / /_/ > | \// __ \| | / /_/ | | || | \___ /|__| (____ /____/\____ | |__||__| /_____/ \/ \/ grep rough audit - static analysis tool v2.8 written by @Wireghoul =================================[justanotherhacker.com]=== libdata-compare-perl-1.27/lib/Data/Compare.pm-60- # register all the handlers libdata-compare-perl-1.27/lib/Data/Compare.pm:61: foreach my $require (@{$requires}) { libdata-compare-perl-1.27/lib/Data/Compare.pm-62- my($handler, $type1, $type2, $cruft) = reverse @{$require}; ############################################## libdata-compare-perl-1.27/lib/Data/Compare.pm-155- } libdata-compare-perl-1.27/lib/Data/Compare.pm:156: elsif (Scalar::Util::refaddr($x) == Scalar::Util::refaddr($y)) { # exactly the same reference libdata-compare-perl-1.27/lib/Data/Compare.pm-157- $rval = 1; ############################################## libdata-compare-perl-1.27/t/taint.t-11-# } else { libdata-compare-perl-1.27/t/taint.t:12:# exec("$^X -Tw -Iblib/lib t/realtainttest"); libdata-compare-perl-1.27/t/taint.t-13-# }