===========================================================
                                      .___ __  __   
          _________________  __ __  __| _/|__|/  |_ 
         / ___\_` __ \__  \ |  |  \/ __ | | \\_  __\
        / /_/  >  | \// __ \|  |  / /_/ | |  ||  |  
        \___  /|__|  (____  /____/\____ | |__||__|  
       /_____/            \/           \/           
              grep rough audit - static analysis tool
                  v2.8 written by @Wireghoul
=================================[justanotherhacker.com]===
libjifty-dbi-perl-0.78/inc/Module/Install.pm-376-# Done in evals to avoid confusing Perl::MinimumVersion
libjifty-dbi-perl-0.78/inc/Module/Install.pm:377:eval( $] >= 5.006 ? <<'END_NEW' : <<'END_OLD' ); die $@ if $@;
libjifty-dbi-perl-0.78/inc/Module/Install.pm-378-sub _read {
##############################################
libjifty-dbi-perl-0.78/inc/Module/Install.pm-416-# Done in evals to avoid confusing Perl::MinimumVersion
libjifty-dbi-perl-0.78/inc/Module/Install.pm:417:eval( $] >= 5.006 ? <<'END_NEW' : <<'END_OLD' ); die $@ if $@;
libjifty-dbi-perl-0.78/inc/Module/Install.pm-418-sub _write {
##############################################
libjifty-dbi-perl-0.78/inc/Module/Install/Makefile.pm-45-sub makemaker {
libjifty-dbi-perl-0.78/inc/Module/Install/Makefile.pm:46:	( @_ < 2 or $makemaker >= eval($_[1]) ) ? $makemaker : 0
libjifty-dbi-perl-0.78/inc/Module/Install/Makefile.pm-47-}
##############################################
libjifty-dbi-perl-0.78/inc/Module/Install/Fetch.pm-84-    return if exists $args{size} and -s $file != $args{size};
libjifty-dbi-perl-0.78/inc/Module/Install/Fetch.pm:85:    system($args{run}) if exists $args{run};
libjifty-dbi-perl-0.78/inc/Module/Install/Fetch.pm-86-    unlink($file) if $args{remove};
##############################################
libjifty-dbi-perl-0.78/t/06filter_duration.t-72-        
libjifty-dbi-perl-0.78/t/06filter_duration.t:73:        my $sth = $handle->simple_query("SELECT my_data FROM users WHERE id = $id");
libjifty-dbi-perl-0.78/t/06filter_duration.t-74-        my ($seconds) = $sth->fetchrow_array;
##############################################
libjifty-dbi-perl-0.78/t/utils.pl-330-        my ($exists) = $handle->dbh->selectrow_array(
libjifty-dbi-perl-0.78/t/utils.pl:331:            "select 1 from pg_tables where tablename = ?", undef, $table
libjifty-dbi-perl-0.78/t/utils.pl-332-        );
##############################################
libjifty-dbi-perl-0.78/t/01records.t-127-        $newrec = TestApp::Address->new( handle => $handle );
libjifty-dbi-perl-0.78/t/01records.t:128:        ($val, $msg) = $newrec->_load_from_sql('SELECT id FROM addresses WHERE id = ?', $newid);
libjifty-dbi-perl-0.78/t/01records.t-129-        is($val, 1, 'found object');
##############################################
libjifty-dbi-perl-0.78/t/06filter_boolean.t-61-
libjifty-dbi-perl-0.78/t/06filter_boolean.t:62:        my $sth = $handle->simple_query("SELECT my_data FROM users WHERE id = $id");
libjifty-dbi-perl-0.78/t/06filter_boolean.t-63-        my ($got) = $sth->fetchrow_array;
##############################################
libjifty-dbi-perl-0.78/lib/Jifty/DBI/Handle/mysql.pm-108-
libjifty-dbi-perl-0.78/lib/Jifty/DBI/Handle/mysql.pm:109:    my ($column_info) = ($create_table =~ /`$column`(.*?)(?:,|$)/i)
libjifty-dbi-perl-0.78/lib/Jifty/DBI/Handle/mysql.pm-110-        or die "Cannot find column '$column' in $create_table";
##############################################
libjifty-dbi-perl-0.78/lib/Jifty/DBI/Handle.pm-408-    while ( my $key = shift @pairs ) {
libjifty-dbi-perl-0.78/lib/Jifty/DBI/Handle.pm:409:        $where .= $key . "=?" . " AND ";
libjifty-dbi-perl-0.78/lib/Jifty/DBI/Handle.pm-410-        push( @bind, shift(@pairs) );
##############################################
libjifty-dbi-perl-0.78/lib/Jifty/DBI/Handle.pm-412-
libjifty-dbi-perl-0.78/lib/Jifty/DBI/Handle.pm:413:    $where =~ s/AND $//;
libjifty-dbi-perl-0.78/lib/Jifty/DBI/Handle.pm-414-    my $query_string = "DELETE FROM " . $table . ' ' . $where;
##############################################
libjifty-dbi-perl-0.78/lib/Jifty/DBI/Handle.pm-486-    foreach my $key ( keys %{ $args{'primary_keys'} } ) {
libjifty-dbi-perl-0.78/lib/Jifty/DBI/Handle.pm:487:        $where .= $key . "=?" . " AND ";
libjifty-dbi-perl-0.78/lib/Jifty/DBI/Handle.pm-488-        push( @bind, $args{'primary_keys'}{$key} );
libjifty-dbi-perl-0.78/lib/Jifty/DBI/Handle.pm-489-    }
libjifty-dbi-perl-0.78/lib/Jifty/DBI/Handle.pm:490:    $where =~ s/AND\s$//;
libjifty-dbi-perl-0.78/lib/Jifty/DBI/Handle.pm-491-