=========================================================== .___ __ __ _________________ __ __ __| _/|__|/ |_ / ___\_` __ \__ \ | | \/ __ | | \\_ __\ / /_/ > | \// __ \| | / /_/ | | || | \___ /|__| (____ /____/\____ | |__||__| /_____/ \/ \/ grep rough audit - static analysis tool v2.8 written by @Wireghoul =================================[justanotherhacker.com]=== libdbd-odbc-perl-1.61/Makefile.PL-356- #$odbchome = $tmp_odbchome if (-e "$tmp_odbchome/odbc.ini") libdbd-odbc-perl-1.61/Makefile.PL:357: chomp($odbchome = `cygpath \$WINDIR`); libdbd-odbc-perl-1.61/Makefile.PL-358- } elsif (-f '/opt/sapdb/interfaces/odbc/lib/libsqlod.a') { ############################################## libdbd-odbc-perl-1.61/Makefile.PL-595- if (-x "$odbchome/bin/iodbc-config") { libdbd-odbc-perl-1.61/Makefile.PL:596: my $cf = `$odbchome/bin/iodbc-config --cflags 2>&1`; libdbd-odbc-perl-1.61/Makefile.PL-597- if ($cf =~ /\-I/) { ############################################## libdbd-odbc-perl-1.61/Makefile.PL-613- print " Found odbcinst in $odbchome/bin\n"; libdbd-odbc-perl-1.61/Makefile.PL:614: my $j = `$odbchome/bin/odbcinst -j 2>&1`; libdbd-odbc-perl-1.61/Makefile.PL-615- print " odbcinst -j reports:\n\n$j\n" if $j; ############################################## libdbd-odbc-perl-1.61/Makefile.PL-627- #for my $oca (@args) { libdbd-odbc-perl-1.61/Makefile.PL:628: # my $c = `$odbchome/bin/odbc_config $oca 2>&1`; libdbd-odbc-perl-1.61/Makefile.PL-629- # chomp $c; ############################################## libdbd-odbc-perl-1.61/Makefile.PL-634- #print "\n"; libdbd-odbc-perl-1.61/Makefile.PL:635: my $cf = `$odbchome/bin/odbc_config --cflags 2>&1`; libdbd-odbc-perl-1.61/Makefile.PL-636- if ($cf =~ /\-D/) { ############################################## libdbd-odbc-perl-1.61/Makefile.PL-851- print "Looking for odbc_config at $configbin\n"; libdbd-odbc-perl-1.61/Makefile.PL:852: $odbc_config_v = `$configbin --version 2>&1`; libdbd-odbc-perl-1.61/Makefile.PL-853- } ############################################## libdbd-odbc-perl-1.61/Makefile.PL-856- $configbin = 'odbc_config'; libdbd-odbc-perl-1.61/Makefile.PL:857: $odbc_config_v = `$configbin --version 2>/dev/null`; libdbd-odbc-perl-1.61/Makefile.PL-858- if (!defined($odbc_config_v) || ($odbc_config_v !~ /^(\d\.)+/)) { ############################################## libdbd-odbc-perl-1.61/Makefile.PL-883- libdbd-odbc-perl-1.61/Makefile.PL:884: $home = `$configbin --prefix 2>&1`; libdbd-odbc-perl-1.61/Makefile.PL-885- chomp $home; ############################################## libdbd-odbc-perl-1.61/Makefile.PL-894- if (! -e "$home") { libdbd-odbc-perl-1.61/Makefile.PL:895: my $ocp = `which $configbin`; libdbd-odbc-perl-1.61/Makefile.PL-896- if ($ocp) { ############################################## libdbd-odbc-perl-1.61/Makefile.PL-904- libdbd-odbc-perl-1.61/Makefile.PL:905: $inc = `$configbin --include-prefix`; libdbd-odbc-perl-1.61/Makefile.PL-906- chomp $inc; ############################################## libdbd-odbc-perl-1.61/Makefile.PL-908- libdbd-odbc-perl-1.61/Makefile.PL:909: $lib = `$configbin --lib-prefix`; libdbd-odbc-perl-1.61/Makefile.PL-910- chomp $lib; ############################################## libdbd-odbc-perl-1.61/Makefile.PL-927-# if (!$found_hdrs) { libdbd-odbc-perl-1.61/Makefile.PL:928:# my $ocp = `which $configbin`; libdbd-odbc-perl-1.61/Makefile.PL-929-# if ($ocp) { ############################################## libdbd-odbc-perl-1.61/Makefile.PL-962-# if (!$found_libdir) { libdbd-odbc-perl-1.61/Makefile.PL:963:# my $ocp = `which $configbin`; libdbd-odbc-perl-1.61/Makefile.PL-964-# if ($ocp) { ############################################## libdbd-odbc-perl-1.61/Makefile.PL-995- print "Looking for iodbc-config at $configbin\n"; libdbd-odbc-perl-1.61/Makefile.PL:996: $iodbc_config_v = `$configbin --version 2>&1`; libdbd-odbc-perl-1.61/Makefile.PL-997- } ############################################## libdbd-odbc-perl-1.61/Makefile.PL-1000- $configbin = 'iodbc-config'; libdbd-odbc-perl-1.61/Makefile.PL:1001: $iodbc_config_v = `$configbin --version 2>/dev/null`; libdbd-odbc-perl-1.61/Makefile.PL-1002- if (!defined($iodbc_config_v) || ($iodbc_config_v !~ /^(\d\.)+/)) { ############################################## libdbd-odbc-perl-1.61/Makefile.PL-1008- libdbd-odbc-perl-1.61/Makefile.PL:1009: my $iodbc_ini = `$configbin --odbcini 2>&1`; libdbd-odbc-perl-1.61/Makefile.PL-1010- print " ODBC data sources should be added to $iodbc_ini\n" ############################################## libdbd-odbc-perl-1.61/Makefile.PL-1012- libdbd-odbc-perl-1.61/Makefile.PL:1013: my $iodbc_instini = `$configbin --odbcinstini 2>&1`; libdbd-odbc-perl-1.61/Makefile.PL-1014- print " ODBC drivers should be added to $iodbc_instini\n" ############################################## libdbd-odbc-perl-1.61/Makefile.PL-1019- libdbd-odbc-perl-1.61/Makefile.PL:1020: $home = `$configbin --prefix 2>&1`; libdbd-odbc-perl-1.61/Makefile.PL-1021- if (!defined($home)) { ############################################## libdbd-odbc-perl-1.61/t/45_unicode_varchar.t-151- foreach my $hex_val(@$hex) { libdbd-odbc-perl-1.61/t/45_unicode_varchar.t:152: $r = $h->selectrow_arrayref(q/select count(*) from PERL_DBD_TABLE1 where cast(a as varbinary(100)) = / . $hex_val); libdbd-odbc-perl-1.61/t/45_unicode_varchar.t-153- is($r->[0], 1, "hex comparison $hex_val");