=========================================================== .___ __ __ _________________ __ __ __| _/|__|/ |_ / ___\_` __ \__ \ | | \/ __ | | \\_ __\ / /_/ > | \// __ \| | / /_/ | | || | \___ /|__| (____ /____/\____ | |__||__| /_____/ \/ \/ grep rough audit - static analysis tool v2.8 written by @Wireghoul =================================[justanotherhacker.com]=== libtest-simple-perl-1.302183/lib/Test2/API/InterceptResult.pm-49- my $uc_file = pkg_to_file($upgrade_class); libtest-simple-perl-1.302183/lib/Test2/API/InterceptResult.pm:50: require($uc_file) unless $INC{$uc_file}; libtest-simple-perl-1.302183/lib/Test2/API/InterceptResult.pm-51- return $upgrade_class->new(facet_data => $fd, result_class => $class); ############################################## libtest-simple-perl-1.302183/lib/Test2/API/InterceptResult/Event.pm-89- my $rc_file = pkg_to_file($rc); libtest-simple-perl-1.302183/lib/Test2/API/InterceptResult/Event.pm:90: require($rc_file) unless $INC{$rc_file}; libtest-simple-perl-1.302183/lib/Test2/API/InterceptResult/Event.pm-91- ############################################## libtest-simple-perl-1.302183/lib/Test/More.pm-897- libtest-simple-perl-1.302183/lib/Test/More.pm:898: my( $eval_result, $eval_error ) = _eval($code); libtest-simple-perl-1.302183/lib/Test/More.pm-899- my $ok = $tb->ok( $eval_result, "require $module;" ); ############################################## libtest-simple-perl-1.302183/lib/Test/More.pm-1008- libtest-simple-perl-1.302183/lib/Test/More.pm:1009: my ($eval_result, $eval_error) = _eval($code, \@imports, $warn); libtest-simple-perl-1.302183/lib/Test/More.pm-1010- my $ok = $tb->ok( $eval_result, "use $module;" ); ############################################## libtest-simple-perl-1.302183/t/00compile.t-39- local $SIG{__WARN__} = sub { push @warnings => @_ }; libtest-simple-perl-1.302183/t/00compile.t:40: require($file); libtest-simple-perl-1.302183/t/00compile.t-41- 1 ############################################## libtest-simple-perl-1.302183/t/Legacy/exit.t-99- my $file = File::Spec->catfile($lib, $test_name); libtest-simple-perl-1.302183/t/Legacy/exit.t:100: my $wait_stat = system(qq{$Perl -"I../blib/lib" -"I../lib" -"I../t/lib" $file}); libtest-simple-perl-1.302183/t/Legacy/exit.t-101- my $actual_exit = exitstatus($wait_stat);