===========================================================
.___ __ __
_________________ __ __ __| _/|__|/ |_
/ ___\_` __ \__ \ | | \/ __ | | \\_ __\
/ /_/ > | \// __ \| | / /_/ | | || |
\___ /|__| (____ /____/\____ | |__||__|
/_____/ \/ \/
grep rough audit - static analysis tool
v2.8 written by @Wireghoul
=================================[justanotherhacker.com]===
libhtml-mason-perl-1.59/benchmarks/bench.pl-138- my $size = sprintf( '%.2f', ( $proc->size / 1024 ) );
libhtml-mason-perl-1.59/benchmarks/bench.pl:139:# my ($rss, $vsz) = `ps -eo rss,vsz -p $$` =~ /(\d+)\s+(\d+)/;
libhtml-mason-perl-1.59/benchmarks/bench.pl-140- print " Real mem: $rss MB\n";
##############################################
libhtml-mason-perl-1.59/benchmarks/bench.pl-165- $interp->out_method(\$out);
libhtml-mason-perl-1.59/benchmarks/bench.pl:166: $interp->exec( $comp, @args );
libhtml-mason-perl-1.59/benchmarks/bench.pl-167-}
##############################################
libhtml-mason-perl-1.59/samples/dump-request-254- ...
libhtml-mason-perl-1.59/samples/dump-request:255: my $remoteuser = lookupFromInAddr ($c->local_addr,
libhtml-mason-perl-1.59/samples/dump-request-256- $c->remote_addr, 2);
##############################################
libhtml-mason-perl-1.59/lib/HTML/Mason/FAQ.pod-216- <%init>
libhtml-mason-perl-1.59/lib/HTML/Mason/FAQ.pod:217: my $bar = $dbh->selectrow_array("SELECT bar FROM t WHERE foo=?", $foo);
libhtml-mason-perl-1.59/lib/HTML/Mason/FAQ.pod-218- return $bar;
##############################################
libhtml-mason-perl-1.59/lib/HTML/Mason/Tests.pm-527- $test->{pretest_code}->() if $test->{pretest_code};
libhtml-mason-perl-1.59/lib/HTML/Mason/Tests.pm:528: $interp->exec( $test->{call_path}, @{$test->{call_args}} );
libhtml-mason-perl-1.59/lib/HTML/Mason/Tests.pm-529-}
##############################################
libhtml-mason-perl-1.59/lib/HTML/Mason/CGIHandler.pm-108- if (wantarray) {
libhtml-mason-perl-1.59/lib/HTML/Mason/CGIHandler.pm:109: @result = eval { $self->interp->exec($p->{comp}, %args) };
libhtml-mason-perl-1.59/lib/HTML/Mason/CGIHandler.pm-110- } elsif ( defined wantarray ) {
libhtml-mason-perl-1.59/lib/HTML/Mason/CGIHandler.pm:111: $result[0] = eval { $self->interp->exec($p->{comp}, %args) };
libhtml-mason-perl-1.59/lib/HTML/Mason/CGIHandler.pm-112- } else {
libhtml-mason-perl-1.59/lib/HTML/Mason/CGIHandler.pm:113: eval { $self->interp->exec($p->{comp}, %args) };
libhtml-mason-perl-1.59/lib/HTML/Mason/CGIHandler.pm-114- }
##############################################
libhtml-mason-perl-1.59/t/09-component.t-453-my $c = 3;
libhtml-mason-perl-1.59/t/09-component.t:454:$m->subexec('/component/args_copying_helper', a=>$a, b=>$b, c=>$c);
libhtml-mason-perl-1.59/t/09-component.t-455-</%init>
##############################################
libhtml-mason-perl-1.59/t/19-subrequest.t-349- component => <<'EOF',
libhtml-mason-perl-1.59/t/19-subrequest.t:350:% $m->subexec( $m->interp->load('/subrequest/support/output') );
libhtml-mason-perl-1.59/t/19-subrequest.t-351-EOF
##############################################
libhtml-mason-perl-1.59/t/19-subrequest.t-363-% if ($count < $max) {
libhtml-mason-perl-1.59/t/19-subrequest.t:364:% $m->subexec('subexec_recurse_test', count=>$count+1, max=>$max)
libhtml-mason-perl-1.59/t/19-subrequest.t-365-% }
##############################################
libhtml-mason-perl-1.59/t/lib/Apache/test.pm-164- my %compiled;
libhtml-mason-perl-1.59/t/lib/Apache/test.pm:165: for (`$httpd -V`) {
libhtml-mason-perl-1.59/t/lib/Apache/test.pm-166- if (/([\w]+)="(.*)"/) {
##############################################
libhtml-mason-perl-1.59/t/lib/Apache/test.pm-268-
libhtml-mason-perl-1.59/t/lib/Apache/test.pm:269: my @l = `$httpd -l`;
libhtml-mason-perl-1.59/t/lib/Apache/test.pm-270- return {map {lc($_) => 1} map /(\S+)\.c/, @l};
##############################################
libhtml-mason-perl-1.59/t/lib/Apache/test.pm-296-
libhtml-mason-perl-1.59/t/lib/Apache/test.pm:297: return 1 if `$httpd -l` =~ /mod_perl\.c/;
libhtml-mason-perl-1.59/t/lib/Apache/test.pm-298-
##############################################
libhtml-mason-perl-1.59/t/lib/Mason/ApacheTest.pm-73-
libhtml-mason-perl-1.59/t/lib/Mason/ApacheTest.pm:74: my ($version) = `$apache_bin -v` =~ m{version: Apache/(\d)};
libhtml-mason-perl-1.59/t/lib/Mason/ApacheTest.pm-75-
##############################################
libhtml-mason-perl-1.59/t/lib/Mason/ApacheTest.pm-427-
libhtml-mason-perl-1.59/t/lib/Mason/ApacheTest.pm:428: system ($cmd)
libhtml-mason-perl-1.59/t/lib/Mason/ApacheTest.pm-429- and die "Can't start httpd server as '$cmd': $!";
##############################################
libhtml-mason-perl-1.59/t/10b-cache-chi.t-542-% return if $m->cache_self;
libhtml-mason-perl-1.59/t/10b-cache-chi.t:543:% $m->subexec('cache_self_with_subexec2', a=>$ARGS{a});
libhtml-mason-perl-1.59/t/10b-cache-chi.t-544-EOF
##############################################
libhtml-mason-perl-1.59/t/23-leak2.t-26- my $comp = $interp->make_component( comp_source => 'Comp' );
libhtml-mason-perl-1.59/t/23-leak2.t:27: $interp->exec( $comp, foo => 1 );
libhtml-mason-perl-1.59/t/23-leak2.t-28- memory_cycle_ok( $interp, 'Interp after making a request with in-memory comp' );
##############################################
libhtml-mason-perl-1.59/t/07-interp.t-801-% my $interp = HTML::Mason::Tests->tests_class->_make_interp( out_method => \$buffer );
libhtml-mason-perl-1.59/t/07-interp.t:802:% $interp->exec( "/mason_tests/$$/comps/interp/no_comp_root_helper" );
libhtml-mason-perl-1.59/t/07-interp.t-803-<% $buffer %>
##############################################
libhtml-mason-perl-1.59/t/06-compiler.t-1025- %$compiler_params);
libhtml-mason-perl-1.59/t/06-compiler.t:1026:$interp->exec($m->current_comp->path, count=>$count+1, compiler_params=>$compiler_params, object_id_hash=>$object_id_hash);
libhtml-mason-perl-1.59/t/06-compiler.t-1027-$m->print($buf);
##############################################
libhtml-mason-perl-1.59/t/10-cache.t-544-% return if $m->cache_self;
libhtml-mason-perl-1.59/t/10-cache.t:545:% $m->subexec('cache_self_with_subexec2', a=>$ARGS{a});
libhtml-mason-perl-1.59/t/10-cache.t-546-EOF
##############################################
libhtml-mason-perl-1.59/t/18-leak.t-224-my $anon_comp = $m->interp->make_component( comp_source => $anon_comp_text );
libhtml-mason-perl-1.59/t/18-leak.t:225:$m->subexec('support/recursive_caller_1', anon_comp=>$anon_comp);
libhtml-mason-perl-1.59/t/18-leak.t-226-$m->interp->flush_code_cache;
libhtml-mason-perl-1.59/t/18-leak.t-227-$m->print("destroy_count = " . HTML::Mason::Component->_destroy_count . "\n");
libhtml-mason-perl-1.59/t/18-leak.t:228:$m->subexec('support/recursive_caller_1', anon_comp=>$anon_comp);
libhtml-mason-perl-1.59/t/18-leak.t-229-$m->interp->flush_code_cache;
##############################################
libhtml-mason-perl-1.59/bin/mason.pl-26-my $interp = HTML::Mason::Interp->new(%$params);
libhtml-mason-perl-1.59/bin/mason.pl:27:$interp->exec( $component, @$args );
libhtml-mason-perl-1.59/bin/mason.pl-28-
##############################################
libhtml-mason-perl-1.59/debian/libhtml-mason-perl.postinst-32-# set permissions
libhtml-mason-perl-1.59/debian/libhtml-mason-perl.postinst:33:if [ "`getent passwd $webuser`" -a "`getent group $webgroup `" ]
libhtml-mason-perl-1.59/debian/libhtml-mason-perl.postinst-34-then
##############################################
libhtml-mason-perl-1.59/debian/libhtml-mason-perl.preinst-14-
libhtml-mason-perl-1.59/debian/libhtml-mason-perl.preinst:15:if [ "`getent passwd $webuser`" -a "`getent group $webgroup `" ]; then
libhtml-mason-perl-1.59/debian/libhtml-mason-perl.preinst-16- chown $webuser:$webgroup /var/cache/mason/cache /var/cache/mason/obj
##############################################
libhtml-mason-perl-1.59/.pc/02_cgihandler.patch/lib/HTML/Mason/CGIHandler.pm-105- if (wantarray) {
libhtml-mason-perl-1.59/.pc/02_cgihandler.patch/lib/HTML/Mason/CGIHandler.pm:106: @result = eval { $self->interp->exec($p->{comp}, %args) };
libhtml-mason-perl-1.59/.pc/02_cgihandler.patch/lib/HTML/Mason/CGIHandler.pm-107- } elsif ( defined wantarray ) {
libhtml-mason-perl-1.59/.pc/02_cgihandler.patch/lib/HTML/Mason/CGIHandler.pm:108: $result[0] = eval { $self->interp->exec($p->{comp}, %args) };
libhtml-mason-perl-1.59/.pc/02_cgihandler.patch/lib/HTML/Mason/CGIHandler.pm-109- } else {
libhtml-mason-perl-1.59/.pc/02_cgihandler.patch/lib/HTML/Mason/CGIHandler.pm:110: eval { $self->interp->exec($p->{comp}, %args) };
libhtml-mason-perl-1.59/.pc/02_cgihandler.patch/lib/HTML/Mason/CGIHandler.pm-111- }