=========================================================== .___ __ __ _________________ __ __ __| _/|__|/ |_ / ___\_` __ \__ \ | | \/ __ | | \\_ __\ / /_/ > | \// __ \| | / /_/ | | || | \___ /|__| (____ /____/\____ | |__||__| /_____/ \/ \/ grep rough audit - static analysis tool v2.8 written by @Wireghoul =================================[justanotherhacker.com]=== libsql-abstract-perl-1.87/lib/SQL/Abstract/Tree.pm-224- libsql-abstract-perl-1.87/lib/SQL/Abstract/Tree.pm:225: where => $green, libsql-abstract-perl-1.87/lib/SQL/Abstract/Tree.pm-226- values => $yellow, ############################################## libsql-abstract-perl-1.87/t/07subqueries.t-29-push @tests, { libsql-abstract-perl-1.87/t/07subqueries.t:30: where => $where, libsql-abstract-perl-1.87/t/07subqueries.t-31- stmt => " WHERE ( bar IN (SELECT c1 FROM t1 WHERE c2 < ? AND c3 LIKE ?) AND foo = ? )", ############################################## libsql-abstract-perl-1.87/t/07subqueries.t-43-push @tests, { libsql-abstract-perl-1.87/t/07subqueries.t:44: where => $where, libsql-abstract-perl-1.87/t/07subqueries.t-45- stmt => " WHERE ( bar > ALL (SELECT c1 FROM t1 WHERE (( c2 < ? AND c3 LIKE ? )) ) AND foo = ? )", ############################################## libsql-abstract-perl-1.87/t/07subqueries.t-56-push @tests, { libsql-abstract-perl-1.87/t/07subqueries.t:57: where => $where, libsql-abstract-perl-1.87/t/07subqueries.t-58- stmt => " WHERE ( EXISTS (SELECT * FROM t1 WHERE ( c1 = ? AND c2 > t0.c0 )) AND foo = ? )", ############################################## libsql-abstract-perl-1.87/t/07subqueries.t-66-push @tests, { libsql-abstract-perl-1.87/t/07subqueries.t:67: where => $where, libsql-abstract-perl-1.87/t/07subqueries.t-68- stmt => " WHERE ( MATCH (col1, col2) AGAINST (?) )", ############################################## libsql-abstract-perl-1.87/t/07subqueries.t-81-push @tests, { libsql-abstract-perl-1.87/t/07subqueries.t:82: where => $where, libsql-abstract-perl-1.87/t/07subqueries.t-83- stmt => " WHERE ( NOT ( ( ( ( age < ? ) OR ( age > ? ) ) ) ) AND lname LIKE ? )", ############################################## libsql-abstract-perl-1.87/t/07subqueries.t-94-push @tests, { libsql-abstract-perl-1.87/t/07subqueries.t:95: where => $where, libsql-abstract-perl-1.87/t/07subqueries.t-96- stmt => " WHERE ( bar IN (SELECT c1 FROM t1 WHERE c2 < ? AND c3 LIKE ?) AND foo = ? )", ############################################## libsql-abstract-perl-1.87/t/05in_between.t-67- ( map { { libsql-abstract-perl-1.87/t/05in_between.t:68: where => { x => { -between => $_ } }, libsql-abstract-perl-1.87/t/05in_between.t-69- test => 'invalid -between args', ############################################## libsql-abstract-perl-1.87/t/05in_between.t-303- throws_ok { ($stmt) = $sql->where($case->{where}) } $e, "$label throws correctly" libsql-abstract-perl-1.87/t/05in_between.t:304: or diag dumper ({ where => $case->{where}, result => $stmt }); libsql-abstract-perl-1.87/t/05in_between.t-305- } ############################################## libsql-abstract-perl-1.87/t/21op_ident.t-25- FROM ${q}artist${q} libsql-abstract-perl-1.87/t/21op_ident.t:26: WHERE ${q}artist${q}.${q}name${q} = ${q}artist${q}.${q}pseudonym${q} libsql-abstract-perl-1.87/t/21op_ident.t-27- ", ############################################## libsql-abstract-perl-1.87/t/21op_ident.t-39- SET ${q}artist${q}.${q}name${q} = ${q}artist${q}.${q}pseudonym${q} libsql-abstract-perl-1.87/t/21op_ident.t:40: WHERE ${q}artist${q}.${q}name${q} != ${q}artist${q}.${q}pseudonym${q} libsql-abstract-perl-1.87/t/21op_ident.t-41- ", ############################################## libsql-abstract-perl-1.87/t/02where.t-214- { libsql-abstract-perl-1.87/t/02where.t:215: where => { foo => $not_stringifiable, }, libsql-abstract-perl-1.87/t/02where.t-216- stmt => " WHERE ( foo = ? )", ############################################## libsql-abstract-perl-1.87/t/01generate.t-683- stmt => "WHERE x $sop ? OR x $sop ?", libsql-abstract-perl-1.87/t/01generate.t:684: stmt_q => "WHERE `x` $sop ? OR `x` $sop ?", libsql-abstract-perl-1.87/t/01generate.t-685- bind => [ 42, 69 ], ############################################## libsql-abstract-perl-1.87/t/16no_sideeffects.t-8-ok my $sqlat = SQL::Abstract::Tree->new({profile=>'html'}); libsql-abstract-perl-1.87/t/16no_sideeffects.t:9:ok my $out = $sqlat->format('SELECT * FROM bar WHERE x = ?', $placeholders); libsql-abstract-perl-1.87/t/16no_sideeffects.t-10- ############################################## libsql-abstract-perl-1.87/t/23_is_X_value.t-178- is ( libsql-abstract-perl-1.87/t/23_is_X_value.t:179: refaddr( ${is_plain_value($num)} ), libsql-abstract-perl-1.87/t/23_is_X_value.t-180- refaddr $num,