=========================================================== .___ __ __ _________________ __ __ __| _/|__|/ |_ / ___\_` __ \__ \ | | \/ __ | | \\_ __\ / /_/ > | \// __ \| | / /_/ | | || | \___ /|__| (____ /____/\____ | |__||__| /_____/ \/ \/ grep rough audit - static analysis tool v2.8 written by @Wireghoul =================================[justanotherhacker.com]=== libanyevent-dbi-perl-3.04/t/fake-mysql-330- close (CONFIG_FILE); libanyevent-dbi-perl-3.04/t/fake-mysql:331: eval ('$config_sub = sub { '.$config_text.'}') or die $@; libanyevent-dbi-perl-3.04/t/fake-mysql-332- my @config_rules = &$config_sub(); ############################################## libanyevent-dbi-perl-3.04/t/01_fake_mysql.t-129- libanyevent-dbi-perl-3.04/t/01_fake_mysql.t:130:$dbh->exec ("select a,b,c from nosuchtable1", $qrydone); $num_qry++; libanyevent-dbi-perl-3.04/t/01_fake_mysql.t:131:$dbh->exec ("select a,b,c from rows1" , $qrydone); $num_qry++; libanyevent-dbi-perl-3.04/t/01_fake_mysql.t:132:$dbh->exec ("select a,b,c from nosuchtable2", $qrydone); $num_qry++; libanyevent-dbi-perl-3.04/t/01_fake_mysql.t:133:$dbh->exec ("select a,b,c from rows2" , $qrydone); $num_qry++; libanyevent-dbi-perl-3.04/t/01_fake_mysql.t:134:$dbh->exec ("select a,b,c from nosuchtable3", $qrydone); $num_qry++; libanyevent-dbi-perl-3.04/t/01_fake_mysql.t:135:$dbh->exec ("select a,b,c from rows3" , $qrydone); $num_qry++; libanyevent-dbi-perl-3.04/t/01_fake_mysql.t:136:$dbh->exec ("select a,b,c from nosuchtable4", $qrydone); $num_qry++; libanyevent-dbi-perl-3.04/t/01_fake_mysql.t:137:$dbh->exec ("select a,b,c from rows4" , $qrydone); $num_qry++; libanyevent-dbi-perl-3.04/t/01_fake_mysql.t-138- ############################################## libanyevent-dbi-perl-3.04/t/02_sql_lite.t-49-$cv = AnyEvent->condvar; libanyevent-dbi-perl-3.04/t/02_sql_lite.t:50:$dbh->exec('select bogus_column from no_such_table',sub {return $cv->send($@) unless $_[1];$cv->send(undef,$_[1])}); libanyevent-dbi-perl-3.04/t/02_sql_lite.t-51-($error,$result) = $cv->recv(); ############################################## libanyevent-dbi-perl-3.04/t/02_sql_lite.t-78-$cv = AnyEvent->condvar; libanyevent-dbi-perl-3.04/t/02_sql_lite.t:79:$dbh->exec('select bogus_column from no_such_table',sub {return $cv->send($@) unless $_[1];$cv->send(undef,$_[1])}); libanyevent-dbi-perl-3.04/t/02_sql_lite.t-80-($error,$result) = $cv->recv(); ############################################## libanyevent-dbi-perl-3.04/t/02_sql_lite.t-86-$cv = AnyEvent->condvar; libanyevent-dbi-perl-3.04/t/02_sql_lite.t:87:$dbh->exec('create table a_table (a_column text)',sub {return $cv->send($@) unless $_[1];$cv->send(undef,$_[1])}); libanyevent-dbi-perl-3.04/t/02_sql_lite.t-88-($error,$result) = $cv->recv(); ############################################## libanyevent-dbi-perl-3.04/t/02_sql_lite.t-92-$cv = AnyEvent->condvar; libanyevent-dbi-perl-3.04/t/02_sql_lite.t:93:$dbh->exec('insert into a_table (a_column) values(?)','test',sub {return $cv->send($@) unless $#_;$cv->send(undef,@_[1,2])}); libanyevent-dbi-perl-3.04/t/02_sql_lite.t-94-($error,$result,$rv) = $cv->recv(); ############################################## libanyevent-dbi-perl-3.04/t/02_sql_lite.t-99-$cv = AnyEvent->condvar; libanyevent-dbi-perl-3.04/t/02_sql_lite.t:100:$dbh->exec('select a_column from a_table',sub {return $cv->send($@) unless $#_;$cv->send(undef,@_[1,2])}); libanyevent-dbi-perl-3.04/t/02_sql_lite.t-101-($error,$result,$rv) = $cv->recv(); ############################################## libanyevent-dbi-perl-3.04/t/02_sql_lite.t-129-$cv = AnyEvent->condvar; libanyevent-dbi-perl-3.04/t/02_sql_lite.t:130:$dbh->exec('insert into a_table (a_column) values(?)','moredata',sub {return $cv->send($@) unless $#_;$cv->send(undef,@_[1,2])}); libanyevent-dbi-perl-3.04/t/02_sql_lite.t-131-($error,$result,$rv) = $cv->recv; ############################################## libanyevent-dbi-perl-3.04/t/02_sql_lite.t-153-$cv = AnyEvent->condvar; libanyevent-dbi-perl-3.04/t/02_sql_lite.t:154:$dbh->exec('select a_column from a_table',sub {return $cv->send($@) unless $_[1];$cv->send(undef,@_[1,2])}); libanyevent-dbi-perl-3.04/t/02_sql_lite.t-155-($error,$result,$rv) = $cv->recv(); ############################################## libanyevent-dbi-perl-3.04/t/02_sql_lite.t-162-$cv = AnyEvent->condvar; libanyevent-dbi-perl-3.04/t/02_sql_lite.t:163:$dbh->exec('insert into a_table (a_column) values(?)','moredata',sub {return $cv->send($@) unless $#_;$cv->send(undef,@_[1,2])}); libanyevent-dbi-perl-3.04/t/02_sql_lite.t-164-($error,$result,$rv) = $cv->recv(); ############################################## libanyevent-dbi-perl-3.04/t/02_sql_lite.t-175-$cv = AnyEvent->condvar; libanyevent-dbi-perl-3.04/t/02_sql_lite.t:176:$dbh->exec('select a_column from a_table',sub {return $cv->send($@) unless $_[1];$cv->send(undef,@_[1,2])}); libanyevent-dbi-perl-3.04/t/02_sql_lite.t-177-($error,$result,$rv) = $cv->recv(); ############################################## libanyevent-dbi-perl-3.04/t/02_sql_lite.t-196-$cv = AnyEvent->condvar; libanyevent-dbi-perl-3.04/t/02_sql_lite.t:197:#$dbh->exec('select a_column from a_table where instr(a_column,?)','re',sub {return $cv->send($@) unless $_[0];$cv->send(undef,@_[1,2]);}); libanyevent-dbi-perl-3.04/t/02_sql_lite.t-198-$dbh->exec('select a_column from a_table where xyzzyinstr(a_column,?)','re', ############################################## libanyevent-dbi-perl-3.04/t/02_sql_lite.t-223-$cv = AnyEvent->condvar; libanyevent-dbi-perl-3.04/t/02_sql_lite.t:224:$dbh->exec('select a_column from a_table where instr(a_column,?) >= 0','re',sub {return $cv->send($@) unless $_[1];$cv->send(undef,@_[1,2])}); libanyevent-dbi-perl-3.04/t/02_sql_lite.t-225-($error,$result,$rv) = $cv->recv(); ############################################## libanyevent-dbi-perl-3.04/t/02_sql_lite.t-232- unlink $tfn if $tfn; libanyevent-dbi-perl-3.04/t/02_sql_lite.t:233:# system ("cat $tfn_err"); libanyevent-dbi-perl-3.04/t/02_sql_lite.t-234- unlink $tfn_err if $tfn_err; ############################################## libanyevent-dbi-perl-3.04/DBI.pm-431- libanyevent-dbi-perl-3.04/DBI.pm:432:=item $dbh->exec ("statement", @args, $cb->($dbh, \@rows, $rv)) libanyevent-dbi-perl-3.04/DBI.pm-433- ############################################## libanyevent-dbi-perl-3.04/README-169- libanyevent-dbi-perl-3.04/README:170: $dbh->exec ("statement", @args, $cb->($dbh, \@rows, $rv)) libanyevent-dbi-perl-3.04/README-171- Executes the given SQL statement with placeholders replaced by ############################################## libanyevent-dbi-perl-3.04/debian/patches/test-sqlite-3.7.15.patch-20- $cv = AnyEvent->condvar; libanyevent-dbi-perl-3.04/debian/patches/test-sqlite-3.7.15.patch:21: #$dbh->exec('select a_column from a_table where instr(a_column,?)','re',sub {return $cv->send($@) unless $_[0];$cv->send(undef,@_[1,2]);}); libanyevent-dbi-perl-3.04/debian/patches/test-sqlite-3.7.15.patch-22-@@ -196,6 +200,7 @@ $dbh->exec('select a_column from a_table ############################################## libanyevent-dbi-perl-3.04/.pc/test-sqlite-3.7.15.patch/t/02_sql_lite.t-49-$cv = AnyEvent->condvar; libanyevent-dbi-perl-3.04/.pc/test-sqlite-3.7.15.patch/t/02_sql_lite.t:50:$dbh->exec('select bogus_column from no_such_table',sub {return $cv->send($@) unless $_[1];$cv->send(undef,$_[1])}); libanyevent-dbi-perl-3.04/.pc/test-sqlite-3.7.15.patch/t/02_sql_lite.t-51-($error,$result) = $cv->recv(); ############################################## libanyevent-dbi-perl-3.04/.pc/test-sqlite-3.7.15.patch/t/02_sql_lite.t-78-$cv = AnyEvent->condvar; libanyevent-dbi-perl-3.04/.pc/test-sqlite-3.7.15.patch/t/02_sql_lite.t:79:$dbh->exec('select bogus_column from no_such_table',sub {return $cv->send($@) unless $_[1];$cv->send(undef,$_[1])}); libanyevent-dbi-perl-3.04/.pc/test-sqlite-3.7.15.patch/t/02_sql_lite.t-80-($error,$result) = $cv->recv(); ############################################## libanyevent-dbi-perl-3.04/.pc/test-sqlite-3.7.15.patch/t/02_sql_lite.t-86-$cv = AnyEvent->condvar; libanyevent-dbi-perl-3.04/.pc/test-sqlite-3.7.15.patch/t/02_sql_lite.t:87:$dbh->exec('create table a_table (a_column text)',sub {return $cv->send($@) unless $_[1];$cv->send(undef,$_[1])}); libanyevent-dbi-perl-3.04/.pc/test-sqlite-3.7.15.patch/t/02_sql_lite.t-88-($error,$result) = $cv->recv(); ############################################## libanyevent-dbi-perl-3.04/.pc/test-sqlite-3.7.15.patch/t/02_sql_lite.t-92-$cv = AnyEvent->condvar; libanyevent-dbi-perl-3.04/.pc/test-sqlite-3.7.15.patch/t/02_sql_lite.t:93:$dbh->exec('insert into a_table (a_column) values(?)','test',sub {return $cv->send($@) unless $#_;$cv->send(undef,@_[1,2])}); libanyevent-dbi-perl-3.04/.pc/test-sqlite-3.7.15.patch/t/02_sql_lite.t-94-($error,$result,$rv) = $cv->recv(); ############################################## libanyevent-dbi-perl-3.04/.pc/test-sqlite-3.7.15.patch/t/02_sql_lite.t-99-$cv = AnyEvent->condvar; libanyevent-dbi-perl-3.04/.pc/test-sqlite-3.7.15.patch/t/02_sql_lite.t:100:$dbh->exec('select a_column from a_table',sub {return $cv->send($@) unless $#_;$cv->send(undef,@_[1,2])}); libanyevent-dbi-perl-3.04/.pc/test-sqlite-3.7.15.patch/t/02_sql_lite.t-101-($error,$result,$rv) = $cv->recv(); ############################################## libanyevent-dbi-perl-3.04/.pc/test-sqlite-3.7.15.patch/t/02_sql_lite.t-129-$cv = AnyEvent->condvar; libanyevent-dbi-perl-3.04/.pc/test-sqlite-3.7.15.patch/t/02_sql_lite.t:130:$dbh->exec('insert into a_table (a_column) values(?)','moredata',sub {return $cv->send($@) unless $#_;$cv->send(undef,@_[1,2])}); libanyevent-dbi-perl-3.04/.pc/test-sqlite-3.7.15.patch/t/02_sql_lite.t-131-($error,$result,$rv) = $cv->recv; ############################################## libanyevent-dbi-perl-3.04/.pc/test-sqlite-3.7.15.patch/t/02_sql_lite.t-153-$cv = AnyEvent->condvar; libanyevent-dbi-perl-3.04/.pc/test-sqlite-3.7.15.patch/t/02_sql_lite.t:154:$dbh->exec('select a_column from a_table',sub {return $cv->send($@) unless $_[1];$cv->send(undef,@_[1,2])}); libanyevent-dbi-perl-3.04/.pc/test-sqlite-3.7.15.patch/t/02_sql_lite.t-155-($error,$result,$rv) = $cv->recv(); ############################################## libanyevent-dbi-perl-3.04/.pc/test-sqlite-3.7.15.patch/t/02_sql_lite.t-162-$cv = AnyEvent->condvar; libanyevent-dbi-perl-3.04/.pc/test-sqlite-3.7.15.patch/t/02_sql_lite.t:163:$dbh->exec('insert into a_table (a_column) values(?)','moredata',sub {return $cv->send($@) unless $#_;$cv->send(undef,@_[1,2])}); libanyevent-dbi-perl-3.04/.pc/test-sqlite-3.7.15.patch/t/02_sql_lite.t-164-($error,$result,$rv) = $cv->recv(); ############################################## libanyevent-dbi-perl-3.04/.pc/test-sqlite-3.7.15.patch/t/02_sql_lite.t-175-$cv = AnyEvent->condvar; libanyevent-dbi-perl-3.04/.pc/test-sqlite-3.7.15.patch/t/02_sql_lite.t:176:$dbh->exec('select a_column from a_table',sub {return $cv->send($@) unless $_[1];$cv->send(undef,@_[1,2])}); libanyevent-dbi-perl-3.04/.pc/test-sqlite-3.7.15.patch/t/02_sql_lite.t-177-($error,$result,$rv) = $cv->recv(); ############################################## libanyevent-dbi-perl-3.04/.pc/test-sqlite-3.7.15.patch/t/02_sql_lite.t-192-$cv = AnyEvent->condvar; libanyevent-dbi-perl-3.04/.pc/test-sqlite-3.7.15.patch/t/02_sql_lite.t:193:#$dbh->exec('select a_column from a_table where instr(a_column,?)','re',sub {return $cv->send($@) unless $_[0];$cv->send(undef,@_[1,2]);}); libanyevent-dbi-perl-3.04/.pc/test-sqlite-3.7.15.patch/t/02_sql_lite.t-194-$dbh->exec('select a_column from a_table where xyzzyinstr(a_column,?)','re', ############################################## libanyevent-dbi-perl-3.04/.pc/test-sqlite-3.7.15.patch/t/02_sql_lite.t-218-$cv = AnyEvent->condvar; libanyevent-dbi-perl-3.04/.pc/test-sqlite-3.7.15.patch/t/02_sql_lite.t:219:$dbh->exec('select a_column from a_table where instr(a_column,?) >= 0','re',sub {return $cv->send($@) unless $_[1];$cv->send(undef,@_[1,2])}); libanyevent-dbi-perl-3.04/.pc/test-sqlite-3.7.15.patch/t/02_sql_lite.t-220-($error,$result,$rv) = $cv->recv(); ############################################## libanyevent-dbi-perl-3.04/.pc/test-sqlite-3.7.15.patch/t/02_sql_lite.t-227- unlink $tfn if $tfn; libanyevent-dbi-perl-3.04/.pc/test-sqlite-3.7.15.patch/t/02_sql_lite.t:228:# system ("cat $tfn_err"); libanyevent-dbi-perl-3.04/.pc/test-sqlite-3.7.15.patch/t/02_sql_lite.t-229- unlink $tfn_err if $tfn_err;