===========================================================
                                      .___ __  __   
          _________________  __ __  __| _/|__|/  |_ 
         / ___\_` __ \__  \ |  |  \/ __ | | \\_  __\
        / /_/  >  | \// __ \|  |  / /_/ | |  ||  |  
        \___  /|__|  (____  /____/\____ | |__||__|  
       /_____/            \/           \/           
              grep rough audit - static analysis tool
                  v2.8 written by @Wireghoul
=================================[justanotherhacker.com]===
libdbd-mariadb-perl-1.21/Makefile.PL-676-  return undef unless $opt->{'mysql_config'} and $opt->{'mysql_config'} ne 'skip';
libdbd-mariadb-perl-1.21/Makefile.PL:677:  my $output = `$opt->{'mysql_config'} --$param 2>&1`;
libdbd-mariadb-perl-1.21/Makefile.PL-678-  if ($? == 0 and defined $output and $output !~ /Options:|Usage:|unrecognized option/) {
##############################################
libdbd-mariadb-perl-1.21/t/magic.t-27-                tie my $param, 'TieScalarCounter', $param_str;
libdbd-mariadb-perl-1.21/t/magic.t:28:                my $statement_str = "SELECT * FROM t WHERE i = " . $dbh->quote($param_str) . " OR i = ?";
libdbd-mariadb-perl-1.21/t/magic.t-29-                tie my $statement, 'TieScalarCounter', $statement_str;
##############################################
libdbd-mariadb-perl-1.21/t/magic.t-39-                tie my $param, 'TieScalarCounter', $param_str;
libdbd-mariadb-perl-1.21/t/magic.t:40:                my $statement_str = "SELECT * FROM t WHERE i = " . $dbh->quote($param_str) . " OR i = ?";
libdbd-mariadb-perl-1.21/t/magic.t-41-                tie my $statement, 'TieScalarCounter', $statement_str;
##############################################
libdbd-mariadb-perl-1.21/t/magic.t-51-                tie my $param, 'TieScalarCounter', $param_str;
libdbd-mariadb-perl-1.21/t/magic.t:52:                my $statement_str = "SELECT * FROM t WHERE i = " . $dbh->quote($param_str) . " OR i = ?";
libdbd-mariadb-perl-1.21/t/magic.t-53-                tie my $statement, 'TieScalarCounter', $statement_str;
##############################################
libdbd-mariadb-perl-1.21/t/magic.t-66-                tie my $param, 'TieScalarCounter', $param_str;
libdbd-mariadb-perl-1.21/t/magic.t:67:                my $statement_str = "SELECT * FROM t WHERE i = " . $dbh->quote($param_str) . " OR i = ?";
libdbd-mariadb-perl-1.21/t/magic.t-68-                tie my $statement, 'TieScalarCounter', $statement_str;
##############################################
libdbd-mariadb-perl-1.21/t/magic.t-83-                tie my $param, 'TieScalarCounter', $param_str;
libdbd-mariadb-perl-1.21/t/magic.t:84:                my $statement_str = "SELECT * FROM t WHERE i = " . $dbh->quote($param_str) . " OR i = ?";
libdbd-mariadb-perl-1.21/t/magic.t-85-                tie my $statement, 'TieScalarCounter', $statement_str;
##############################################
libdbd-mariadb-perl-1.21/t/magic.t-99-                tie my $param, 'TieScalarCounter', $param_str;
libdbd-mariadb-perl-1.21/t/magic.t:100:                my $statement_str = "SELECT * FROM t WHERE i = " . $dbh->quote($param_str) . " OR i = ?";
libdbd-mariadb-perl-1.21/t/magic.t-101-                tie my $statement, 'TieScalarCounter', $statement_str;
##############################################
libdbd-mariadb-perl-1.21/t/90utf8_params.t-132-
libdbd-mariadb-perl-1.21/t/90utf8_params.t:133:            (my $out) = $dbh->selectrow_array("SELECT payload FROM unicode_test WHERE id = $id1");
libdbd-mariadb-perl-1.21/t/90utf8_params.t-134-            is($out, "\N{U+C3}\N{U+BF}", "unicode / $trials[$i] / utf8::downgrade / $charset / $enable_str");
libdbd-mariadb-perl-1.21/t/90utf8_params.t-135-
libdbd-mariadb-perl-1.21/t/90utf8_params.t:136:            ($out) = $dbh->selectrow_array("SELECT payload FROM unicode_test WHERE id = $id2");
libdbd-mariadb-perl-1.21/t/90utf8_params.t-137-            is($out, "\N{U+C3}\N{U+BF}", "unicode / $trials[$i] / utf8::upgrade / $charset / $enable_str");
##############################################
libdbd-mariadb-perl-1.21/t/90utf8_params.t-206-
libdbd-mariadb-perl-1.21/t/90utf8_params.t:207:            (my $out) = $dbh->selectrow_array("SELECT payload FROM blob_test WHERE id = $id1");
libdbd-mariadb-perl-1.21/t/90utf8_params.t-208-            is($out, chr(0xc3).chr(0xbf), "blob / $trials[$i] / utf8::downgrade / $charset / $enable_str");
libdbd-mariadb-perl-1.21/t/90utf8_params.t-209-
libdbd-mariadb-perl-1.21/t/90utf8_params.t:210:            ($out) = $dbh->selectrow_array("SELECT payload FROM blob_test WHERE id = $id2");
libdbd-mariadb-perl-1.21/t/90utf8_params.t-211-            is($out, chr(0xc3).chr(0xbf), "blob / $trials[$i] / utf8::upgrade / $charset / $enable_str");
##############################################
libdbd-mariadb-perl-1.21/t/50chopblanks.t-53-	ok $sth->execute($id, ($value) x $numfields), "insert into dbd_mysql_t50chopblanks values ($id ".(", '$value'" x $numfields).")";
libdbd-mariadb-perl-1.21/t/50chopblanks.t:54:	ok $sth2->execute($id), "select $fieldlist from dbd_mysql_t50chopblanks where id = $id";
libdbd-mariadb-perl-1.21/t/50chopblanks.t-55-
##############################################
libdbd-mariadb-perl-1.21/t/41int_min_max.t-29-    ok($dbh->do(qq{
libdbd-mariadb-perl-1.21/t/41int_min_max.t:30:            CREATE TEMPORARY TABLE `$table` (
libdbd-mariadb-perl-1.21/t/41int_min_max.t-31-                `id` int not null auto_increment,
##############################################
libdbd-mariadb-perl-1.21/t/41int_min_max.t-109-
libdbd-mariadb-perl-1.21/t/41int_min_max.t:110:    ok($dbh->do(qq{DROP TEMPORARY TABLE `$table`}), "removing $table");
libdbd-mariadb-perl-1.21/t/41int_min_max.t-111-}
##############################################
libdbd-mariadb-perl-1.21/t/rt25389-bin-case.t-29-        my $create =
libdbd-mariadb-perl-1.21/t/rt25389-bin-case.t:30:"CREATE TEMPORARY TABLE `$table` (name VARCHAR(8) CHARACTER SET $charset COLLATE ${charset}_bin $unique)";
libdbd-mariadb-perl-1.21/t/rt25389-bin-case.t-31-
##############################################
libdbd-mariadb-perl-1.21/t/rt25389-bin-case.t-33-        for (@test) {
libdbd-mariadb-perl-1.21/t/rt25389-bin-case.t:34:            $dbh->do("insert into `$table` values ('$_')");
libdbd-mariadb-perl-1.21/t/rt25389-bin-case.t-35-        }
libdbd-mariadb-perl-1.21/t/rt25389-bin-case.t:36:        my $q1 = "select name from `$table`";
libdbd-mariadb-perl-1.21/t/rt25389-bin-case.t-37-        $sth = $dbh->prepare($q1);
##############################################
libdbd-mariadb-perl-1.21/t/rt25389-bin-case.t-44-
libdbd-mariadb-perl-1.21/t/rt25389-bin-case.t:45:        my $q2 = "select name from `$table` where "
libdbd-mariadb-perl-1.21/t/rt25389-bin-case.t-46-          . join( " OR ", map { "name = '$_'" } @test );