=========================================================== .___ __ __ _________________ __ __ __| _/|__|/ |_ / ___\_` __ \__ \ | | \/ __ | | \\_ __\ / /_/ > | \// __ \| | / /_/ | | || | \___ /|__| (____ /____/\____ | |__||__| /_____/ \/ \/ grep rough audit - static analysis tool v2.8 written by @Wireghoul =================================[justanotherhacker.com]=== libtest-assertions-perl-1.054/t/Test-Assertions.t-159-ASSERT(1,"OK");ASSERT(1,"OK");'); libtest-assertions-perl-1.054/t/Test-Assertions.t:160:system("$^X $file3 > $file1 2> $file2"); libtest-assertions-perl-1.054/t/Test-Assertions.t-161-ASSERT( scalar(READ_FILE($file1) =~ m/1\.\.2.*ok 1.*ok 2/s), "child process writes to $file1"); ############################################## libtest-assertions-perl-1.054/t/Test-Assertions.t-168-ASSERT(1);'); libtest-assertions-perl-1.054/t/Test-Assertions.t:169:system("$^X $file3 > $file1 2> $file2"); libtest-assertions-perl-1.054/t/Test-Assertions.t-170-ASSERT( scalar(READ_FILE($file1) =~ m/1\.\.2.*ok 1/s), "child process writes to $file1"); ############################################## libtest-assertions-perl-1.054/t/Test-Assertions.t-179-ASSERT(1);'); libtest-assertions-perl-1.054/t/Test-Assertions.t:180:system("$^X $file3 > $file1 2> $file2"); libtest-assertions-perl-1.054/t/Test-Assertions.t-181-ASSERT( scalar(READ_FILE($file1) =~ m/1\.\.1.*ok 1/s), "child process writes to $file1"); ############################################## libtest-assertions-perl-1.054/t/Test-Assertions.t-185-ASSERT(1,"OK");'); libtest-assertions-perl-1.054/t/Test-Assertions.t:186:system("$^X $file3 > $file1 2> $file2"); libtest-assertions-perl-1.054/t/Test-Assertions.t-187-ASSERT( ! -s $file1, "child process writes nothing to $file1"); ############################################## libtest-assertions-perl-1.054/t/Test-Assertions.t-207- libtest-assertions-perl-1.054/t/Test-Assertions.t:208:$rv = system("$^X Test-Assertion_style.pl die > $file1 2> $file2"); libtest-assertions-perl-1.054/t/Test-Assertions.t-209-ASSERT($rv != 0, "child exited not OK"); ############################################## libtest-assertions-perl-1.054/t/Test-Assertions.t-212- libtest-assertions-perl-1.054/t/Test-Assertions.t:213:$rv = system("$^X Test-Assertion_style.pl warn > $file1 2> $file2"); libtest-assertions-perl-1.054/t/Test-Assertions.t-214-ASSERT($rv == 0, "child exited OK"); ############################################## libtest-assertions-perl-1.054/t/Test-Assertions.t-217- libtest-assertions-perl-1.054/t/Test-Assertions.t:218:$rv = system("$^X Test-Assertion_style.pl confess > $file1 2> $file2"); libtest-assertions-perl-1.054/t/Test-Assertions.t-219-ASSERT($rv != 0, "child exited not OK"); ############################################## libtest-assertions-perl-1.054/t/Test-Assertions.t-222- libtest-assertions-perl-1.054/t/Test-Assertions.t:223:$rv = system("$^X Test-Assertion_style.pl cluck > $file1 2> $file2"); libtest-assertions-perl-1.054/t/Test-Assertions.t-224-ASSERT($rv == 0, "child exited OK"); ############################################## libtest-assertions-perl-1.054/lib/Test/Assertions.pm-196- my $command = join ' ', @args; libtest-assertions-perl-1.054/lib/Test/Assertions.pm:197: $output = `$command 2>&1`; libtest-assertions-perl-1.054/lib/Test/Assertions.pm-198- $output =~ s/\n$//;