=========================================================== .___ __ __ _________________ __ __ __| _/|__|/ |_ / ___\_` __ \__ \ | | \/ __ | | \\_ __\ / /_/ > | \// __ \| | / /_/ | | || | \___ /|__| (____ /____/\____ | |__||__| /_____/ \/ \/ grep rough audit - static analysis tool v2.8 written by @Wireghoul =================================[justanotherhacker.com]=== libpoet-perl-0.16/eg/blog/bin/install.sh-6-# Load schema into database libpoet-perl-0.16/eg/blog/bin/install.sh:7:cd `dirname $0` libpoet-perl-0.16/eg/blog/bin/install.sh-8-mkdir -p ../data ############################################## libpoet-perl-0.16/eg/blog/bin/purge_old_entries.pl-9-Blog::Article::Manager->delete_articles( libpoet-perl-0.16/eg/blog/bin/purge_old_entries.pl:10: where => [ create_time => { lt => $min_date } ] ); ############################################## libpoet-perl-0.16/lib/Poet/Manual/Intro.pod-150- libpoet-perl-0.16/lib/Poet/Manual/Intro.pod:151: system($poet->bin_path("myscript.pl")); libpoet-perl-0.16/lib/Poet/Manual/Intro.pod-152- ############################################## libpoet-perl-0.16/lib/Poet/Manual/Tutorial.pod-615- Blog::Article::Manager->delete_articles( libpoet-perl-0.16/lib/Poet/Manual/Tutorial.pod:616: where => [ create_time => { lt => $min_date } ] ); libpoet-perl-0.16/lib/Poet/Manual/Tutorial.pod-617- ############################################## libpoet-perl-0.16/lib/Poet/t/PSGIHandler.pm-75- my $cmd = sprintf( "%s /getpl", $poet->bin_path("get.pl") ); libpoet-perl-0.16/lib/Poet/t/PSGIHandler.pm:76: my $output = Capture::Tiny::capture_merged { system($cmd) }; libpoet-perl-0.16/lib/Poet/t/PSGIHandler.pm-77- is( $output, 'path = /getpl', "get.pl output" ); ############################################## libpoet-perl-0.16/lib/Poet/t/Run.pm-32- close STDERR; libpoet-perl-0.16/lib/Poet/t/Run.pm:33: exec( $poet->bin_path("run.pl > $run_log 2>&1") ); libpoet-perl-0.16/lib/Poet/t/Run.pm-34- } ############################################## libpoet-perl-0.16/lib/Poet/t/Script.pm-21- chmod( 0775, $script ); libpoet-perl-0.16/lib/Poet/t/Script.pm:22: my ( $stdout, $stderr ) = capture { system($script) }; libpoet-perl-0.16/lib/Poet/t/Script.pm-23- ok( !$stderr, "no stderr" . ( defined($stderr) ? " - $stderr" : "" ) );