=========================================================== .___ __ __ _________________ __ __ __| _/|__|/ |_ / ___\_` __ \__ \ | | \/ __ | | \\_ __\ / /_/ > | \// __ \| | / /_/ | | || | \___ /|__| (____ /____/\____ | |__||__| /_____/ \/ \/ grep rough audit - static analysis tool v2.8 written by @Wireghoul =================================[justanotherhacker.com]=== libxml-xpath-perl-1.44/t/meta-yml.t-17- for my $mod (keys %{$meta->{provides}}) { libxml-xpath-perl-1.44/t/meta-yml.t:18: eval("use $mod;"); libxml-xpath-perl-1.44/t/meta-yml.t:19: my $mod_version = eval(sprintf("\$%s::VERSION", $mod)); libxml-xpath-perl-1.44/t/meta-yml.t-20- is($meta->{provides}{$mod}{version}, $version, "MYMETA.yml entry [$mod] version matches"); ############################################## libxml-xpath-perl-1.44/t/meta-json.t-17- for my $mod (keys %{$meta->{provides}}) { libxml-xpath-perl-1.44/t/meta-json.t:18: eval("use $mod;"); libxml-xpath-perl-1.44/t/meta-json.t:19: my $mod_version = eval(sprintf("\$%s::VERSION", $mod)); libxml-xpath-perl-1.44/t/meta-json.t-20- is($meta->{provides}{$mod}{version}, $version, "MYMETA.json entry [$mod] version matches"); ############################################## libxml-xpath-perl-1.44/lib/XML/XPath/Expr.pm-136- die ("No RHS of ", $self->as_string) unless $self->{rhs}; libxml-xpath-perl-1.44/lib/XML/XPath/Expr.pm:137: $results = $self->op_eval($node); libxml-xpath-perl-1.44/lib/XML/XPath/Expr.pm-138- }