=========================================================== .___ __ __ _________________ __ __ __| _/|__|/ |_ / ___\_` __ \__ \ | | \/ __ | | \\_ __\ / /_/ > | \// __ \| | / /_/ | | || | \___ /|__| (____ /____/\____ | |__||__| /_____/ \/ \/ grep rough audit - static analysis tool v2.8 written by @Wireghoul =================================[justanotherhacker.com]=== libregexp-debugger-perl-0.002006/lib/Regexp/Debugger.pm-338- use Scalar::Util qw< refaddr >; libregexp-debugger-perl-0.002006/lib/Regexp/Debugger.pm:339: my $obj_id = refaddr($obj); libregexp-debugger-perl-0.002006/lib/Regexp/Debugger.pm-340- return $regex_cache{$obj_id} if $regex_cache{$obj_id};