===========================================================
.___ __ __
_________________ __ __ __| _/|__|/ |_
/ ___\_` __ \__ \ | | \/ __ | | \\_ __\
/ /_/ > | \// __ \| | / /_/ | | || |
\___ /|__| (____ /____/\____ | |__||__|
/_____/ \/ \/
grep rough audit - static analysis tool
v2.8 written by @Wireghoul
=================================[justanotherhacker.com]===
libdata-stag-perl-0.14/Data/Stag/StagImpl.pm-2275-#use overload
libdata-stag-perl-0.14/Data/Stag/StagImpl.pm:2276:# '.' => sub {my @r=findnodeVal($_[0],$_[1]);$r[0]},
libdata-stag-perl-0.14/Data/Stag/StagImpl.pm:2277:# '-' => sub {my @r=findnodeVal($_[0],$_[1]);$r[0]},
libdata-stag-perl-0.14/Data/Stag/StagImpl.pm-2278-# '+' => sub {my @r=$_[0]->findnode($_[1]);return $r[0]},
libdata-stag-perl-0.14/Data/Stag/StagImpl.pm:2279:# '/' => sub {[findnodeVal($_[0],$_[1])]},
libdata-stag-perl-0.14/Data/Stag/StagImpl.pm-2280-# '*' => sub {[$_[0]->findnode($_[1])]},
##############################################
libdata-stag-perl-0.14/homepage/mkpodhtml.pl-9-print "$cmd\n";
libdata-stag-perl-0.14/homepage/mkpodhtml.pl:10:print `$cmd`;
##############################################
libdata-stag-perl-0.14/homepage/mkscriptdoc.pl-46- my $url = "script-docs/$n.html";
libdata-stag-perl-0.14/homepage/mkscriptdoc.pl:47: system("pod2html --title $n --htmlroot . --podroot . $f > $url");
libdata-stag-perl-0.14/homepage/mkscriptdoc.pl-48- my $pod = Data::Stag->parse(-file=>$f,-format=>'Data::Stag::PodParser');
##############################################
libdata-stag-perl-0.14/Makefile.PL-24- my ($ver,$desc,$expl,$module) = split( /\// , $str);
libdata-stag-perl-0.14/Makefile.PL:25: if( !eval "require($name)") {
libdata-stag-perl-0.14/Makefile.PL-26- print "External Module $name, $desc,\n is not installed on this computer.\n $module in Data::Stag needs it for $expl\n\n";
##############################################
libdata-stag-perl-0.14/scripts/stag-db.pl-34-if ($help) {
libdata-stag-perl-0.14/scripts/stag-db.pl:35: system("perldoc $0");
libdata-stag-perl-0.14/scripts/stag-db.pl-36- exit 0;
##############################################
libdata-stag-perl-0.14/scripts/stag-drawtree.pl-21- "font=s"=>\$fontchoice,
libdata-stag-perl-0.14/scripts/stag-drawtree.pl:22: "help|h"=>sub { system("perldoc $0"); exit },
libdata-stag-perl-0.14/scripts/stag-drawtree.pl-23- );
##############################################
libdata-stag-perl-0.14/scripts/stag-elcount.pl-19-if ($help) {
libdata-stag-perl-0.14/scripts/stag-elcount.pl:20: system("perldoc $0");
libdata-stag-perl-0.14/scripts/stag-elcount.pl-21- exit 0;
##############################################
libdata-stag-perl-0.14/scripts/stag-eval.pl-59-if ($help) {
libdata-stag-perl-0.14/scripts/stag-eval.pl:60: system("perldoc $0");
libdata-stag-perl-0.14/scripts/stag-eval.pl-61- exit 0;
##############################################
libdata-stag-perl-0.14/scripts/stag-filter.pl-33-if ($help) {
libdata-stag-perl-0.14/scripts/stag-filter.pl:34: system("perldoc $0");
libdata-stag-perl-0.14/scripts/stag-filter.pl-35- exit 0;
##############################################
libdata-stag-perl-0.14/scripts/stag-findsubtree.pl-44-if ($help) {
libdata-stag-perl-0.14/scripts/stag-findsubtree.pl:45: system("perldoc $0");
libdata-stag-perl-0.14/scripts/stag-findsubtree.pl-46- exit 0;
##############################################
libdata-stag-perl-0.14/scripts/stag-flatten.pl-21- "cols|c=s@"=>\@cols,
libdata-stag-perl-0.14/scripts/stag-flatten.pl:22: "help|h"=>sub { system("perldoc $0"); exit },
libdata-stag-perl-0.14/scripts/stag-flatten.pl-23- "nest|n"=>\$nest,
##############################################
libdata-stag-perl-0.14/scripts/stag-grep.pl-33-if ($help) {
libdata-stag-perl-0.14/scripts/stag-grep.pl:34: system("perldoc $0");
libdata-stag-perl-0.14/scripts/stag-grep.pl-35- exit 0;
##############################################
libdata-stag-perl-0.14/scripts/stag-mogrify.pl-58-if ($help) {
libdata-stag-perl-0.14/scripts/stag-mogrify.pl:59: system("perldoc $0");
libdata-stag-perl-0.14/scripts/stag-mogrify.pl-60- exit 0;
##############################################
libdata-stag-perl-0.14/scripts/stag-query.pl-39-if ($help) {
libdata-stag-perl-0.14/scripts/stag-query.pl:40: system("perldoc $0");
libdata-stag-perl-0.14/scripts/stag-query.pl-41- exit 0;
##############################################
libdata-stag-perl-0.14/scripts/stag-splitter.pl-21-if ($help) {
libdata-stag-perl-0.14/scripts/stag-splitter.pl:22: system("perldoc $0");
libdata-stag-perl-0.14/scripts/stag-splitter.pl-23- exit 0;
##############################################
libdata-stag-perl-0.14/scripts/stag-splitter.pl-26-if ($dir) {
libdata-stag-perl-0.14/scripts/stag-splitter.pl:27: `mkdir $dir` unless -d $dir;
libdata-stag-perl-0.14/scripts/stag-splitter.pl-28- $h->dir($dir);
##############################################
libdata-stag-perl-0.14/scripts/stag-view.pl-22-if ($help) {
libdata-stag-perl-0.14/scripts/stag-view.pl:23: system("perldoc $0");
libdata-stag-perl-0.14/scripts/stag-view.pl-24- exit 0;
##############################################
libdata-stag-perl-0.14/scripts/stag-xmlsplit.pl-35-if ($dir) {
libdata-stag-perl-0.14/scripts/stag-xmlsplit.pl:36: `mkdir $dir` unless -d $dir;
libdata-stag-perl-0.14/scripts/stag-xmlsplit.pl-37- $h->dir($dir);
##############################################
libdata-stag-perl-0.14/scripts/stag-merge.pl-51-if ($help) {
libdata-stag-perl-0.14/scripts/stag-merge.pl:52: system("perldoc $0");
libdata-stag-perl-0.14/scripts/stag-merge.pl-53- exit 0;
##############################################
libdata-stag-perl-0.14/scripts/stag-diff.pl-28-if ($help) {
libdata-stag-perl-0.14/scripts/stag-diff.pl:29: system("perldoc $0");
libdata-stag-perl-0.14/scripts/stag-diff.pl-30- exit 0;
##############################################
libdata-stag-perl-0.14/scripts/stag-join.pl-21-if ($help) {
libdata-stag-perl-0.14/scripts/stag-join.pl:22: system("perldoc $0");
libdata-stag-perl-0.14/scripts/stag-join.pl-23- exit 0;
##############################################
libdata-stag-perl-0.14/scripts/stag-handle.pl-31- "units|u=s@"=>\@units,
libdata-stag-perl-0.14/scripts/stag-handle.pl:32: "help|h"=>sub {system("perldoc $0");exit 0},
libdata-stag-perl-0.14/scripts/stag-handle.pl-33- );
##############################################
libdata-stag-perl-0.14/scripts/stag-autoschema.pl-34-if ($help) {
libdata-stag-perl-0.14/scripts/stag-autoschema.pl:35: system("perldoc $0");
libdata-stag-perl-0.14/scripts/stag-autoschema.pl-36- exit 0;
##############################################
libdata-stag-perl-0.14/scripts/stag-parse.pl-37-if ($help) {
libdata-stag-perl-0.14/scripts/stag-parse.pl:38: system("perldoc $0");
libdata-stag-perl-0.14/scripts/stag-parse.pl-39- exit 0;
##############################################
libdata-stag-perl-0.14/t/bio.x-81- minus(
libdata-stag-perl-0.14/t/bio.x:82: findSubTreeVal($f, "seq_end"),
libdata-stag-perl-0.14/t/bio.x:83: findSubTreeVal($f, "seq_start"),
libdata-stag-perl-0.14/t/bio.x-84- )
##############################################
libdata-stag-perl-0.14/t/bio.x-90- substr(
libdata-stag-perl-0.14/t/bio.x:91: findSubTreeVal($tree, "residues"),
libdata-stag-perl-0.14/t/bio.x:92: findSubTreeVal($f, "seq_start"),
libdata-stag-perl-0.14/t/bio.x-93- fLen($f)
##############################################
libdata-stag-perl-0.14/.pc/fix_manpage_names.patch/scripts/stag-merge.pl-51-if ($help) {
libdata-stag-perl-0.14/.pc/fix_manpage_names.patch/scripts/stag-merge.pl:52: system("perldoc $0");
libdata-stag-perl-0.14/.pc/fix_manpage_names.patch/scripts/stag-merge.pl-53- exit 0;
##############################################
libdata-stag-perl-0.14/.pc/fix_pod_errors.patch/scripts/stag-diff.pl-28-if ($help) {
libdata-stag-perl-0.14/.pc/fix_pod_errors.patch/scripts/stag-diff.pl:29: system("perldoc $0");
libdata-stag-perl-0.14/.pc/fix_pod_errors.patch/scripts/stag-diff.pl-30- exit 0;
##############################################
libdata-stag-perl-0.14/.pc/fix_pod_errors.patch/scripts/stag-join.pl-21-if ($help) {
libdata-stag-perl-0.14/.pc/fix_pod_errors.patch/scripts/stag-join.pl:22: system("perldoc $0");
libdata-stag-perl-0.14/.pc/fix_pod_errors.patch/scripts/stag-join.pl-23- exit 0;
##############################################
libdata-stag-perl-0.14/.pc/fix_pod_errors.patch/scripts/stag-handle.pl-31- "units|u=s@"=>\@units,
libdata-stag-perl-0.14/.pc/fix_pod_errors.patch/scripts/stag-handle.pl:32: "help|h"=>sub {system("perldoc $0");exit 0},
libdata-stag-perl-0.14/.pc/fix_pod_errors.patch/scripts/stag-handle.pl-33- );
##############################################
libdata-stag-perl-0.14/.pc/more_pod_errors.patch/scripts/stag-autoschema.pl-34-if ($help) {
libdata-stag-perl-0.14/.pc/more_pod_errors.patch/scripts/stag-autoschema.pl:35: system("perldoc $0");
libdata-stag-perl-0.14/.pc/more_pod_errors.patch/scripts/stag-autoschema.pl-36- exit 0;
##############################################
libdata-stag-perl-0.14/.pc/more_pod_errors.patch/scripts/stag-parse.pl-37-if ($help) {
libdata-stag-perl-0.14/.pc/more_pod_errors.patch/scripts/stag-parse.pl:38: system("perldoc $0");
libdata-stag-perl-0.14/.pc/more_pod_errors.patch/scripts/stag-parse.pl-39- exit 0;