===========================================================
.___ __ __
_________________ __ __ __| _/|__|/ |_
/ ___\_` __ \__ \ | | \/ __ | | \\_ __\
/ /_/ > | \// __ \| | / /_/ | | || |
\___ /|__| (____ /____/\____ | |__||__|
/_____/ \/ \/
grep rough audit - static analysis tool
v2.8 written by @Wireghoul
=================================[justanotherhacker.com]===
libtest-harness-perl-3.42/examples/bin/forked_tests.pl-59- open( STDERR, '>', "$dest_base/$test.err" ) or die;
libtest-harness-perl-3.42/examples/bin/forked_tests.pl:60: exec( $^X, '-Ilib', $test );
libtest-harness-perl-3.42/examples/bin/forked_tests.pl-61- }
##############################################
libtest-harness-perl-3.42/t/perl5lib.t-17- map {qq{"$_"}} ( $^X, '-e', 'print join q(:), @INC' );
libtest-harness-perl-3.42/t/perl5lib.t:18: my $path = `$command`;
libtest-harness-perl-3.42/t/perl5lib.t-19- my @got = ( $path =~ /($sentinel)/g );
##############################################
libtest-harness-perl-3.42/t/compat/inc-propagation.t-18- map {qq{"$_"}} ( $^X, '-e', 'print join q(:), @INC' );
libtest-harness-perl-3.42/t/compat/inc-propagation.t:19: my $path = `$command`;
libtest-harness-perl-3.42/t/compat/inc-propagation.t-20- my @got = ( $path =~ /($sentinel)/g );
##############################################
libtest-harness-perl-3.42/t/nofork.t-25-
libtest-harness-perl-3.42/t/nofork.t:26: util::stdout_of( sub { system(@args) and die "error $?" } );
libtest-harness-perl-3.42/t/nofork.t-27-}
##############################################
libtest-harness-perl-3.42/t/sample-tests/taint_warn-8- local $SIG{__WARN__} = sub { $warnings .= join '', @_ };
libtest-harness-perl-3.42/t/sample-tests/taint_warn:9: `$^X -e1`;
libtest-harness-perl-3.42/t/sample-tests/taint_warn-10-}
##############################################
libtest-harness-perl-3.42/t/sample-tests/shbang_misparse-10-$SIG{__WARN__} = sub { $warning .= $_[0] };
libtest-harness-perl-3.42/t/sample-tests/shbang_misparse:11:eval( "#" . substr( $0, 0, 0 ) );
libtest-harness-perl-3.42/t/sample-tests/shbang_misparse-12-print $warning ? "not ok 2\n" : "ok 2\n";
##############################################
libtest-harness-perl-3.42/t/sample-tests/taint-5-
libtest-harness-perl-3.42/t/sample-tests/taint:6:eval { `$^X -e1` };
libtest-harness-perl-3.42/t/sample-tests/taint-7-like( $@, '/^Insecure dependency/', '-T honored' );
##############################################
libtest-harness-perl-3.42/lib/App/Prove.pm-621-
libtest-harness-perl-3.42/lib/App/Prove.pm:622: eval("use $class;");
libtest-harness-perl-3.42/lib/App/Prove.pm-623- die "$class_name is required to use the --$for feature: $@" if $@;
##############################################
libtest-harness-perl-3.42/lib/App/Prove/State.pm-219- limit => shift,
libtest-harness-perl-3.42/lib/App/Prove/State.pm:220: where => sub { $_->generation >= $last_gen },
libtest-harness-perl-3.42/lib/App/Prove/State.pm-221- order => sub { $_->sequence }
##############################################
libtest-harness-perl-3.42/lib/App/Prove/State.pm-226- limit => shift,
libtest-harness-perl-3.42/lib/App/Prove/State.pm:227: where => sub { $_->result != 0 },
libtest-harness-perl-3.42/lib/App/Prove/State.pm-228- order => sub { -$_->result }
##############################################
libtest-harness-perl-3.42/lib/App/Prove/State.pm-233- limit => shift,
libtest-harness-perl-3.42/lib/App/Prove/State.pm:234: where => sub { $_->result == 0 }
libtest-harness-perl-3.42/lib/App/Prove/State.pm-235- );
##############################################
libtest-harness-perl-3.42/lib/App/Prove/State.pm-242- limit => shift,
libtest-harness-perl-3.42/lib/App/Prove/State.pm:243: where => sub { $_->num_todo != 0 },
libtest-harness-perl-3.42/lib/App/Prove/State.pm-244- order => sub { -$_->num_todo; }
##############################################
libtest-harness-perl-3.42/lib/App/Prove/State.pm-249- limit => shift,
libtest-harness-perl-3.42/lib/App/Prove/State.pm:250: where => sub { defined $_->last_fail_time },
libtest-harness-perl-3.42/lib/App/Prove/State.pm-251- order => sub { $now - $_->last_fail_time }
##############################################
libtest-harness-perl-3.42/lib/App/Prove/State.pm-280- limit => shift,
libtest-harness-perl-3.42/lib/App/Prove/State.pm:281: where => sub { $_->mtime >= $last_run_time }
libtest-harness-perl-3.42/lib/App/Prove/State.pm-282- );
##############################################
libtest-harness-perl-3.42/lib/App/Prove/State.pm-346- my $results = $self->results;
libtest-harness-perl-3.42/lib/App/Prove/State.pm:347: my $where = $clause->{where} || sub {1};
libtest-harness-perl-3.42/lib/App/Prove/State.pm-348-
##############################################
libtest-harness-perl-3.42/lib/TAP/Parser/Scheduler.pm-158-# execute can be selected. The inner arrays represent sequential
libtest-harness-perl-3.42/lib/TAP/Parser/Scheduler.pm:159:# execution. They can only proceed when the first job is ready to run.
libtest-harness-perl-3.42/lib/TAP/Parser/Scheduler.pm-160-
##############################################
libtest-harness-perl-3.42/lib/TAP/Harness/Env.pm-51- # Avoid using -l for the benefit of Perl 6
libtest-harness-perl-3.42/lib/TAP/Harness/Env.pm:52: chomp( @inc = `"$perl" -e "print join qq[\\n], \@INC, q[]"` );
libtest-harness-perl-3.42/lib/TAP/Harness/Env.pm-53- return @inc;
##############################################
libtest-harness-perl-3.42/lib/Test/Harness.pm-305- # Avoid using -l for the benefit of Perl 6
libtest-harness-perl-3.42/lib/Test/Harness.pm:306: chomp( @inc = `"$perl" -e "print join qq[\\n], \@INC, q[]"` );
libtest-harness-perl-3.42/lib/Test/Harness.pm-307- return @inc;
##############################################
libtest-harness-perl-3.42/.pc/manpage-error.patch/lib/Test/Harness.pm-305- # Avoid using -l for the benefit of Perl 6
libtest-harness-perl-3.42/.pc/manpage-error.patch/lib/Test/Harness.pm:306: chomp( @inc = `"$perl" -e "print join qq[\\n], \@INC, q[]"` );
libtest-harness-perl-3.42/.pc/manpage-error.patch/lib/Test/Harness.pm-307- return @inc;
##############################################
libtest-harness-perl-3.42/.pc/manpage-error.patch/lib/TAP/Harness/Env.pm-51- # Avoid using -l for the benefit of Perl 6
libtest-harness-perl-3.42/.pc/manpage-error.patch/lib/TAP/Harness/Env.pm:52: chomp( @inc = `"$perl" -e "print join qq[\\n], \@INC, q[]"` );
libtest-harness-perl-3.42/.pc/manpage-error.patch/lib/TAP/Harness/Env.pm-53- return @inc;
##############################################
libtest-harness-perl-3.42/.pc/pod-spelling.patch/lib/TAP/Parser/Scheduler.pm-158-# execute can be selected. The inner arrays represent sequential
libtest-harness-perl-3.42/.pc/pod-spelling.patch/lib/TAP/Parser/Scheduler.pm:159:# execution. They can only proceed when the first job is ready to run.
libtest-harness-perl-3.42/.pc/pod-spelling.patch/lib/TAP/Parser/Scheduler.pm-160-