=========================================================== .___ __ __ _________________ __ __ __| _/|__|/ |_ / ___\_` __ \__ \ | | \/ __ | | \\_ __\ / /_/ > | \// __ \| | / /_/ | | || | \___ /|__| (____ /____/\____ | |__||__| /_____/ \/ \/ grep rough audit - static analysis tool v2.8 written by @Wireghoul =================================[justanotherhacker.com]=== libcapture-tiny-perl-0.48/t/lib/Cases.pm-13-my $locale_ok = eval { libcapture-tiny-perl-0.48/t/lib/Cases.pm:14: my $err = capture_stderr { system($^X, '-we', 1) }; libcapture-tiny-perl-0.48/t/lib/Cases.pm-15- $err !~ /setting locale failed/i; ############################################## libcapture-tiny-perl-0.48/t/lib/Cases.pm-68- perl => sub { eval $_[0] }, libcapture-tiny-perl-0.48/t/lib/Cases.pm:69: sys => sub { system($^X, '-e', $_[0]) }, libcapture-tiny-perl-0.48/t/lib/Cases.pm-70-); ############################################## libcapture-tiny-perl-0.48/README-13- ($stdout, $stderr, $exit) = capture { libcapture-tiny-perl-0.48/README:14: system( $cmd, @args ); libcapture-tiny-perl-0.48/README-15- }; ############################################## libcapture-tiny-perl-0.48/lib/Capture/Tiny.pm-229- _open_std( $stash->{child}{$which} ); libcapture-tiny-perl-0.48/lib/Capture/Tiny.pm:230: $stash->{pid}{$which} = system(1, @cmd, $stash->{flag_files}{$which}); libcapture-tiny-perl-0.48/lib/Capture/Tiny.pm-231- # not restoring std here as it all gets redirected again shortly anyway ############################################## libcapture-tiny-perl-0.48/lib/Capture/Tiny.pm-234- else { # use fork libcapture-tiny-perl-0.48/lib/Capture/Tiny.pm:235: _fork_exec( $which, $stash ); libcapture-tiny-perl-0.48/lib/Capture/Tiny.pm-236- } ############################################## libcapture-tiny-perl-0.48/lib/Capture/Tiny.pm-447- ($stdout, $stderr, $exit) = capture { libcapture-tiny-perl-0.48/lib/Capture/Tiny.pm:448: system( $cmd, @args ); libcapture-tiny-perl-0.48/lib/Capture/Tiny.pm-449- };