=========================================================== .___ __ __ _________________ __ __ __| _/|__|/ |_ / ___\_` __ \__ \ | | \/ __ | | \\_ __\ / /_/ > | \// __ \| | / /_/ | | || | \___ /|__| (____ /____/\____ | |__||__| /_____/ \/ \/ grep rough audit - static analysis tool v2.8 written by @Wireghoul =================================[justanotherhacker.com]=== libattean-perl-0.026/inc/Module/Install/Fetch.pm-84- return if exists $args{size} and -s $file != $args{size}; libattean-perl-0.026/inc/Module/Install/Fetch.pm:85: system($args{run}) if exists $args{run}; libattean-perl-0.026/inc/Module/Install/Fetch.pm-86- unlink($file) if $args{remove}; ############################################## libattean-perl-0.026/inc/Module/Install/Makefile.pm-45-sub makemaker { libattean-perl-0.026/inc/Module/Install/Makefile.pm:46: ( @_ < 2 or $makemaker >= eval($_[1]) ) ? $makemaker : 0 libattean-perl-0.026/inc/Module/Install/Makefile.pm-47-} ############################################## libattean-perl-0.026/lib/AtteanX/Parser/SPARQL.pm-1540- my $t = $self->_peek_token; libattean-perl-0.026/lib/AtteanX/Parser/SPARQL.pm:1541: last if (refaddr($t) == refaddr($cur)); libattean-perl-0.026/lib/AtteanX/Parser/SPARQL.pm-1542- } ############################################## libattean-perl-0.026/lib/AtteanX/Parser/SPARQL.pm-2498- my $self = shift; libattean-perl-0.026/lib/AtteanX/Parser/SPARQL.pm:2499: if (my $where = $self->{__no_bnodes}) { libattean-perl-0.026/lib/AtteanX/Parser/SPARQL.pm-2500- croak "Syntax error: Blank nodes not allowed in $where"; ############################################## libattean-perl-0.026/lib/AtteanX/Parser/SPARQL.pm-3224- my $self = shift; libattean-perl-0.026/lib/AtteanX/Parser/SPARQL.pm:3225: if (my $where = $self->{__no_bnodes}) { libattean-perl-0.026/lib/AtteanX/Parser/SPARQL.pm-3226- croak "Syntax error: Blank nodes not allowed in $where"; ############################################## libattean-perl-0.026/lib/AtteanX/Parser/SPARQLXML/SAXHandler.pm-65- if (@_) { libattean-perl-0.026/lib/AtteanX/Parser/SPARQLXML/SAXHandler.pm:66: my $addr = refaddr( $self ); libattean-perl-0.026/lib/AtteanX/Parser/SPARQLXML/SAXHandler.pm-67- my $code = shift; ############################################## libattean-perl-0.026/lib/AtteanX/Parser/SPARQLXML/SAXHandler.pm-84- my $tag = $el->{LocalName}; libattean-perl-0.026/lib/AtteanX/Parser/SPARQLXML/SAXHandler.pm:85: my $addr = refaddr( $self ); libattean-perl-0.026/lib/AtteanX/Parser/SPARQLXML/SAXHandler.pm-86- ############################################## libattean-perl-0.026/lib/AtteanX/Parser/SPARQLXML/SAXHandler.pm-100- my $eel = shift; libattean-perl-0.026/lib/AtteanX/Parser/SPARQLXML/SAXHandler.pm:101: my $addr = refaddr( $self ); libattean-perl-0.026/lib/AtteanX/Parser/SPARQLXML/SAXHandler.pm-102- my $string = $strings{ $addr }; ############################################## libattean-perl-0.026/lib/AtteanX/Parser/SPARQLXML/SAXHandler.pm-159- my $data = shift; libattean-perl-0.026/lib/AtteanX/Parser/SPARQLXML/SAXHandler.pm:160: my $addr = refaddr( $self ); libattean-perl-0.026/lib/AtteanX/Parser/SPARQLXML/SAXHandler.pm-161- ############################################## libattean-perl-0.026/lib/AtteanX/Parser/SPARQLXML/SAXHandler.pm-170- my $self = shift; libattean-perl-0.026/lib/AtteanX/Parser/SPARQLXML/SAXHandler.pm:171: my $addr = refaddr( $self ); libattean-perl-0.026/lib/AtteanX/Parser/SPARQLXML/SAXHandler.pm-172- return $tagstack{ $addr }[0][0]; ############################################## libattean-perl-0.026/lib/AtteanX/Parser/SPARQLXML/SAXHandler.pm-176- my $self = shift; libattean-perl-0.026/lib/AtteanX/Parser/SPARQLXML/SAXHandler.pm:177: my $addr = refaddr( $self ); libattean-perl-0.026/lib/AtteanX/Parser/SPARQLXML/SAXHandler.pm-178- delete $strings{ $addr }; ############################################## libattean-perl-0.026/lib/Attean/SimpleQueryEvaluator.pm-377- } else { libattean-perl-0.026/lib/Attean/SimpleQueryEvaluator.pm:378: my $iter = $self->_eval($active_graph, $s, $child); libattean-perl-0.026/lib/Attean/SimpleQueryEvaluator.pm-379- while (my $n = $iter->next) { ############################################## libattean-perl-0.026/lib/Attean/SimpleQueryEvaluator.pm-479- libattean-perl-0.026/lib/Attean/SimpleQueryEvaluator.pm:480: my $iter = $self->_eval($graph, $term, $path); libattean-perl-0.026/lib/Attean/SimpleQueryEvaluator.pm-481- while (my $n = $iter->next) { ############################################## libattean-perl-0.026/lib/Attean/API/Query.pm-125- my %cb = @_; libattean-perl-0.026/lib/Attean/API/Query.pm:126: return if ($seen->{refaddr($self)}++); libattean-perl-0.026/lib/Attean/API/Query.pm-127- if (my $cb = $cb{ prefix }) { ############################################## libattean-perl-0.026/lib/Attean/API/QueryPlanner.pm-58- libattean-perl-0.026/lib/Attean/API/QueryPlanner.pm:59: if (refaddr($self) == refaddr($model)) { libattean-perl-0.026/lib/Attean/API/QueryPlanner.pm-60- Carp::confess "Model and planner objects cannot be the same in call to cost_for_plan"; ############################################## libattean-perl-0.026/lib/Attean/API/Binding.pm-503- my $val_b = $rowb->value($key); libattean-perl-0.026/lib/Attean/API/Binding.pm:504: my $equal = (refaddr($val_a) == refaddr($val_b)) || $val_a->equals( $val_b ); libattean-perl-0.026/lib/Attean/API/Binding.pm-505- unless ($equal) { ############################################## libattean-perl-0.026/lib/Attean/TreeRewriter.pm-106- my $ok = 0; libattean-perl-0.026/lib/Attean/TreeRewriter.pm:107:# if ($seen->{ refaddr($tree) }++) { libattean-perl-0.026/lib/Attean/TreeRewriter.pm-108-# return (0, $tree); ############################################## libattean-perl-0.026/lib/Attean/TreeRewriter.pm-121- if ($rewritten) { libattean-perl-0.026/lib/Attean/TreeRewriter.pm:122: if (refaddr($rewritten) == refaddr($tree)) { libattean-perl-0.026/lib/Attean/TreeRewriter.pm-123- return (0, $tree); ############################################## libattean-perl-0.026/lib/Attean/TreeRewriter.pm-126- (undef, my $rewritten2) = $self->rewrite($rewritten, $thunk, $seen, $parent); libattean-perl-0.026/lib/Attean/TreeRewriter.pm:127: my $changed = (refaddr($rewritten) != refaddr($rewritten2)); libattean-perl-0.026/lib/Attean/TreeRewriter.pm-128- return ($changed, $rewritten2);