=========================================================== .___ __ __ _________________ __ __ __| _/|__|/ |_ / ___\_` __ \__ \ | | \/ __ | | \\_ __\ / /_/ > | \// __ \| | / /_/ | | || | \___ /|__| (____ /____/\____ | |__||__| /_____/ \/ \/ grep rough audit - static analysis tool v2.8 written by @Wireghoul =================================[justanotherhacker.com]=== libsub-quote-perl-2.006006/lib/Sub/Quote.pm-352- local $@; libsub-quote-perl-2.006006/lib/Sub/Quote.pm:353: $success = _clean_eval($make_sub, \%captures); libsub-quote-perl-2.006006/lib/Sub/Quote.pm-354- $e = $@; ############################################## libsub-quote-perl-2.006006/t/sub-defer.t-182- my $undeferred = undefer_sub($deferred); libsub-quote-perl-2.006006/t/sub-defer.t:183: my $undeferred_addr = refaddr($undeferred); libsub-quote-perl-2.006006/t/sub-defer.t-184- my $deferred_str = "$deferred"; ############################################## libsub-quote-perl-2.006006/t/sub-defer.t-192- libsub-quote-perl-2.006006/t/sub-defer.t:193: isnt refaddr(undefer_sub($deferred_str)), $undeferred_addr, libsub-quote-perl-2.006006/t/sub-defer.t-194- 'undefer_sub on expired deferred named sub does not give undeferred sub'; libsub-quote-perl-2.006006/t/sub-defer.t-195- libsub-quote-perl-2.006006/t/sub-defer.t:196: is refaddr(undefer_sub($undeferred)), $undeferred_addr, libsub-quote-perl-2.006006/t/sub-defer.t-197- 'undefer_sub on undeferred named sub after deferred expiry gives undeferred'; ############################################## libsub-quote-perl-2.006006/t/sub-defer.t-203- my $undeferred = undefer_sub($deferred); libsub-quote-perl-2.006006/t/sub-defer.t:204: my $undeferred_addr = refaddr($undeferred); libsub-quote-perl-2.006006/t/sub-defer.t-205- my $deferred_str = "$deferred"; ############################################## libsub-quote-perl-2.006006/t/sub-defer.t-214- libsub-quote-perl-2.006006/t/sub-defer.t:215: isnt refaddr(undefer_sub($deferred_str)), $undeferred_addr, libsub-quote-perl-2.006006/t/sub-defer.t-216- 'undefer_sub on expired deferred unnamed sub does not give undeferred sub'; libsub-quote-perl-2.006006/t/sub-defer.t-217- libsub-quote-perl-2.006006/t/sub-defer.t:218: is refaddr(undefer_sub($undeferred)), $undeferred_addr, libsub-quote-perl-2.006006/t/sub-defer.t-219- 'undefer_sub on undeferred unnamed sub after deferred expiry gives undeferred'; ############################################## libsub-quote-perl-2.006006/t/sub-defer.t-225- my $undeferred = undefer_sub($deferred); libsub-quote-perl-2.006006/t/sub-defer.t:226: my $undeferred_addr = refaddr($undeferred); libsub-quote-perl-2.006006/t/sub-defer.t-227- my $deferred_str = "$deferred"; ############################################## libsub-quote-perl-2.006006/t/sub-defer.t-239- libsub-quote-perl-2.006006/t/sub-defer.t:240: isnt refaddr(undefer_sub($undeferred_str)), $undeferred_addr, libsub-quote-perl-2.006006/t/sub-defer.t-241- 'undefer_sub on expired undeferred named sub does not give undeferred sub'; ############################################## libsub-quote-perl-2.006006/t/sub-defer.t-247- my $undeferred = undefer_sub($deferred); libsub-quote-perl-2.006006/t/sub-defer.t:248: my $undeferred_addr = refaddr($undeferred); libsub-quote-perl-2.006006/t/sub-defer.t-249- my $deferred_str = "$deferred"; ############################################## libsub-quote-perl-2.006006/t/sub-defer.t-260- libsub-quote-perl-2.006006/t/sub-defer.t:261: isnt refaddr(undefer_sub($undeferred_str)), $undeferred_addr, libsub-quote-perl-2.006006/t/sub-defer.t-262- 'undefer_sub on expired undeferred unnamed sub does not give undeferred sub';