=========================================================== .___ __ __ _________________ __ __ __| _/|__|/ |_ / ___\_` __ \__ \ | | \/ __ | | \\_ __\ / /_/ > | \// __ \| | / /_/ | | || | \___ /|__| (____ /____/\____ | |__||__| /_____/ \/ \/ grep rough audit - static analysis tool v2.8 written by @Wireghoul =================================[justanotherhacker.com]=== libdbd-oracle-perl-1.80/Changes-522- [ENHANCEMENTS] libdbd-oracle-perl-1.80/Changes:523: - added SYSASM session mode. [RT651211] (patch from libdbd-oracle-perl-1.80/Changes-524- Anthony DeRobertis, reported by Julián Moreno Patiño) ############################################## libdbd-oracle-perl-1.80/examples/sql-118- libdbd-oracle-perl-1.80/examples/sql:119: eval($format); libdbd-oracle-perl-1.80/examples/sql-120- } ############################################## libdbd-oracle-perl-1.80/t/lib/DBDOracleTestLib.pm-570- print "From sqlplus...$str\n ...with NLS_LANG = $nls\n"; libdbd-oracle-perl-1.80/t/lib/DBDOracleTestLib.pm:571: system("sqlplus -s \@$sqlfile"); libdbd-oracle-perl-1.80/t/lib/DBDOracleTestLib.pm-572- unlink $sqlfile; ############################################## libdbd-oracle-perl-1.80/lib/DBD/Oracle/Troubleshooting/Macos.pod-437- + delete $ENV{SQLPATH}; libdbd-oracle-perl-1.80/lib/DBD/Oracle/Troubleshooting/Macos.pod:438: my $sqlplus_release = `$sqlplus_exe -S /nolog \@define.sql 2>&1`; libdbd-oracle-perl-1.80/lib/DBD/Oracle/Troubleshooting/Macos.pod-439- + $ENV{SQLPATH} = $sqlpath if $sqlpath; ############################################## libdbd-oracle-perl-1.80/lib/DBD/Oracle.pm-31- ) ], libdbd-oracle-perl-1.80/lib/DBD/Oracle.pm:32: ora_session_modes => [ qw( ORA_SYSDBA ORA_SYSOPER ORA_SYSASM ORA_SYSBACKUP ORA_SYSDG ORA_SYSKM) ], libdbd-oracle-perl-1.80/lib/DBD/Oracle.pm-33- ora_fetch_orient => [ qw( OCI_FETCH_NEXT OCI_FETCH_CURRENT OCI_FETCH_FIRST ############################################## libdbd-oracle-perl-1.80/lib/DBD/Oracle.pm-1281- libdbd-oracle-perl-1.80/lib/DBD/Oracle.pm:1282:ORA_SYSDBA ORA_SYSOPER ORA_SYSASM ORA_SYSBACKUP ORA_SYSDG ORA_SYSKM libdbd-oracle-perl-1.80/lib/DBD/Oracle.pm-1283- ############################################## libdbd-oracle-perl-1.80/mkta.pl-58- or die "$0 aborted - make failed\n"; libdbd-oracle-perl-1.80/mkta.pl:59: system("rm -f $opt_dir/$sid-*-*.log"); libdbd-oracle-perl-1.80/mkta.pl-60- ############################################## libdbd-oracle-perl-1.80/Oracle.xs-31- ORA_SYSOPER = 0x0004 libdbd-oracle-perl-1.80/Oracle.xs:32: ORA_SYSASM = 0x8000 libdbd-oracle-perl-1.80/Oracle.xs-33- ORA_SYSBACKUP = 0x00020000 ############################################## libdbd-oracle-perl-1.80/README.mkdn-34- libdbd-oracle-perl-1.80/README.mkdn:35: ORA\_SYSDBA ORA\_SYSOPER ORA\_SYSASM ORA\_SYSBACKUP ORA\_SYSDG ORA\_SYSKM libdbd-oracle-perl-1.80/README.mkdn-36- ############################################## libdbd-oracle-perl-1.80/README.mkdn-444- libdbd-oracle-perl-1.80/README.mkdn:445:It has been reported that this only works if `$dsn` does not contain libdbd-oracle-perl-1.80/README.mkdn-446-a SID so that Oracle then uses the value of ORACLE\_SID (not ############################################## libdbd-oracle-perl-1.80/README.mkdn-455-Passing a true value for the ora\_oratab\_orahome attribute will make libdbd-oracle-perl-1.80/README.mkdn:456:DBD::Oracle change `$ENV{ORACLE_HOME}` to make the Oracle home directory libdbd-oracle-perl-1.80/README.mkdn-457-that specified in the `/etc/oratab` file _if_ the database to connect to ############################################## libdbd-oracle-perl-1.80/README.mkdn-491-Allows you to add any value (up to 64 bytes) to your session and it can be libdbd-oracle-perl-1.80/README.mkdn:492:retrieved on the server side from the `V$SESSION`a view. libdbd-oracle-perl-1.80/README.mkdn-493- ############################################## libdbd-oracle-perl-1.80/README.mkdn-507-reasons and the first character of the identifier should not be libdbd-oracle-perl-1.80/README.mkdn:508:':'. This value can be retrieved on the server side using `V$SESSION` libdbd-oracle-perl-1.80/README.mkdn-509-view. ############################################## libdbd-oracle-perl-1.80/README.mkdn-517-Allows you to specify any string up to 32 bytes which may be retrieved libdbd-oracle-perl-1.80/README.mkdn:518:on the server side using `V$SESSION` view. libdbd-oracle-perl-1.80/README.mkdn-519- ############################################## libdbd-oracle-perl-1.80/README.mkdn-680-handlers of the process during the connect phase. For instance, some libdbd-oracle-perl-1.80/README.mkdn:681:users have observed Perl's default `$SIG{INT}` handler being ignored libdbd-oracle-perl-1.80/README.mkdn-682-after connecting to an Oracle database. If this causes problems in ############################################## libdbd-oracle-perl-1.80/README.mkdn-747- libdbd-oracle-perl-1.80/README.mkdn:748:While this method can be called as either `$sth->state` or `$dbh->state`, it libdbd-oracle-perl-1.80/README.mkdn:749:is usually clearer to always use `$dbh->state`. libdbd-oracle-perl-1.80/README.mkdn-750- ############################################## libdbd-oracle-perl-1.80/README.mkdn-1350- libdbd-oracle-perl-1.80/README.mkdn:1351:Oracle does not support catalogues, so `$pk_catalog` and `$fk_catalog` are libdbd-oracle-perl-1.80/README.mkdn-1352-ignored as selection criteria (in the new style interface). ############################################## libdbd-oracle-perl-1.80/README.mkdn-1437- libdbd-oracle-perl-1.80/README.mkdn:1438:The `$quick` parameter is currently ignored. libdbd-oracle-perl-1.80/README.mkdn-1439-The method uses the dictionary with the gathered statistics, ############################################## libdbd-oracle-perl-1.80/README.mkdn-1590- libdbd-oracle-perl-1.80/README.mkdn:1591:The value of `$param_num` is a number if using the '?' or if using ":foo" style placeholders, the complete name libdbd-oracle-perl-1.80/README.mkdn-1592-(e.g. ":foo") must be given. libdbd-oracle-perl-1.80/README.mkdn:1593:The `$bind_value` argument is fairly self-explanatory. A value of `undef` will libdbd-oracle-perl-1.80/README.mkdn-1594-bind a `NULL` to the placeholder. Using `undef` is useful when you want ############################################## libdbd-oracle-perl-1.80/README.mkdn-2113-If there are no more rows or if an error occurs, this method returns undef. You should libdbd-oracle-perl-1.80/README.mkdn:2114:check `$sth->err` afterwards (or use the ["RaiseError"](#raiseerror) attribute) to discover if the undef returned libdbd-oracle-perl-1.80/README.mkdn-2115-was due to an error. ############################################## libdbd-oracle-perl-1.80/README.mkdn-2136-If there are no more rows or if an error occurs, this method returns undef. You should libdbd-oracle-perl-1.80/README.mkdn:2137:check `$sth->err` afterwards (or use the ["RaiseError"](#raiseerror) attribute) to discover if the undef returned libdbd-oracle-perl-1.80/README.mkdn-2138-was due to an error. libdbd-oracle-perl-1.80/README.mkdn-2139- libdbd-oracle-perl-1.80/README.mkdn:2140:The optional `$name` argument should be either `NAME`, `NAME_lc` or `NAME_uc`, and indicates libdbd-oracle-perl-1.80/README.mkdn-2141-what sort of transformation to make to the keys in the hash. By default Oracle uses upper case. ############################################## libdbd-oracle-perl-1.80/README.mkdn-2150-statement handle. If there are no more rows, an empty arrayref will be returned. If an error occurs, libdbd-oracle-perl-1.80/README.mkdn:2151:the data read in so far will be returned. Because of this, you should always check `$sth->err` after libdbd-oracle-perl-1.80/README.mkdn-2152-calling this method, unless ["RaiseError"](#raiseerror) has been enabled. libdbd-oracle-perl-1.80/README.mkdn-2153- libdbd-oracle-perl-1.80/README.mkdn:2154:If `$slice` is an array reference, fetchall\_arrayref uses the ["fetchrow\_arrayref"](#fetchrow_arrayref) method to fetch each libdbd-oracle-perl-1.80/README.mkdn:2155:row as an array ref. If the `$slice` array is not empty then it is used as a slice to select individual libdbd-oracle-perl-1.80/README.mkdn-2156-columns by perl array index number (starting at 0, unlike column and parameter numbers which start at 1). ############################################## libdbd-oracle-perl-1.80/README.mkdn-2159- libdbd-oracle-perl-1.80/README.mkdn:2160:If `$slice` is a hash reference, fetchall\_arrayref uses ["fetchrow\_hashref"](#fetchrow_hashref) to fetch each row as a hash reference. libdbd-oracle-perl-1.80/README.mkdn-2161- ############################################## libdbd-oracle-perl-1.80/README.mkdn-2192- libdbd-oracle-perl-1.80/README.mkdn:2193:NOTE: DBD::Oracle does not use the `$bind_type` to determine how to libdbd-oracle-perl-1.80/README.mkdn-2194-bind the column; it uses what Oracle says the data type is. You can ############################################## libdbd-oracle-perl-1.80/README.mkdn-2198- libdbd-oracle-perl-1.80/README.mkdn:2199:See the DBI documentation for a discussion of the optional parameters `\%attr` and `$bind_type` libdbd-oracle-perl-1.80/README.mkdn-2200- ############################################## libdbd-oracle-perl-1.80/README.mkdn-2211-Fetches all the rows from the statement handle, calls `DBI::neat_list` for each row, and libdbd-oracle-perl-1.80/README.mkdn:2212:prints the results to `$fh` (which defaults to `STDOUT`). Rows are separated by `$lsep` (which defaults libdbd-oracle-perl-1.80/README.mkdn:2213:to a newline). Columns are separated by `$fsep` (which defaults to a comma). The `$maxlen` controls libdbd-oracle-perl-1.80/README.mkdn-2214-how wide the output can be, and defaults to 35. ############################################## libdbd-oracle-perl-1.80/README.mkdn-3860-Oracle imposes a restriction on the order of fetching when nested libdbd-oracle-perl-1.80/README.mkdn:3861:cursors are used. Suppose `$sth1` is a handle for a select statement libdbd-oracle-perl-1.80/README.mkdn:3862:involving nested cursors, and `$sth2` is a nested cursor handle fetched libdbd-oracle-perl-1.80/README.mkdn:3863:from `$sth1`. `$sth2` can only be fetched from while `$sth1` is libdbd-oracle-perl-1.80/README.mkdn:3864:still active, and the row containing `$sth2` is still current in `$sth1`. libdbd-oracle-perl-1.80/README.mkdn:3865:Any attempt to fetch another row from `$sth1` renders all nested cursor libdbd-oracle-perl-1.80/README.mkdn:3866:handles previously fetched from `$sth1` defunct. libdbd-oracle-perl-1.80/README.mkdn-3867- ############################################## libdbd-oracle-perl-1.80/.pc/build-without-ld-libray-path.patch/Makefile.PL-518- sleep 2; # libdbd-oracle-perl-1.80/.pc/build-without-ld-libray-path.patch/Makefile.PL:519: system("make $DBD_ORA_OBJ.o CC='$Config{cc}'"); # make a valid .o file. libdbd-oracle-perl-1.80/.pc/build-without-ld-libray-path.patch/Makefile.PL-520- ############################################## libdbd-oracle-perl-1.80/.pc/build-without-ld-libray-path.patch/Makefile.PL-525- print "by executing: [$make]\n"; libdbd-oracle-perl-1.80/.pc/build-without-ld-libray-path.patch/Makefile.PL:526: my @cmds = `$make 2>&1`; libdbd-oracle-perl-1.80/.pc/build-without-ld-libray-path.patch/Makefile.PL-527- chomp @cmds; ############################################## libdbd-oracle-perl-1.80/.pc/build-without-ld-libray-path.patch/Makefile.PL-1448- my $debug = $::opt_d || $::opt_v; libdbd-oracle-perl-1.80/.pc/build-without-ld-libray-path.patch/Makefile.PL:1449: print "Evaluating `$orig`\n" libdbd-oracle-perl-1.80/.pc/build-without-ld-libray-path.patch/Makefile.PL-1450- if $debug && !$expand_shellescape{$orig}; ############################################## libdbd-oracle-perl-1.80/.pc/build-without-ld-libray-path.patch/Makefile.PL-1452- $cmd =~ s/\$[({](\w+)[})]/mkvar("$1", 1, 0, $level+1)/ge; libdbd-oracle-perl-1.80/.pc/build-without-ld-libray-path.patch/Makefile.PL:1453: print " expanded `$cmd`\n" if $debug and $cmd ne $orig; libdbd-oracle-perl-1.80/.pc/build-without-ld-libray-path.patch/Makefile.PL:1454: my $result = `$cmd`; libdbd-oracle-perl-1.80/.pc/build-without-ld-libray-path.patch/Makefile.PL-1455- $result =~ s/\s+$/ /; # newlines etc to single space ############################################## libdbd-oracle-perl-1.80/.pc/build-without-ld-libray-path.patch/Makefile.PL-1617- my $OH_path = $OH; libdbd-oracle-perl-1.80/.pc/build-without-ld-libray-path.patch/Makefile.PL:1618: chomp($OH_path = `/usr/bin/cygpath -u $OH_path`) if $^O eq 'cygwin' && $OH; libdbd-oracle-perl-1.80/.pc/build-without-ld-libray-path.patch/Makefile.PL-1619- ############################################## libdbd-oracle-perl-1.80/.pc/build-without-ld-libray-path.patch/Makefile.PL-1634- close FH; libdbd-oracle-perl-1.80/.pc/build-without-ld-libray-path.patch/Makefile.PL:1635: my $sqlplus_release = `$sqlplus_exe -S /nolog \@define.sql 2>&1`; libdbd-oracle-perl-1.80/.pc/build-without-ld-libray-path.patch/Makefile.PL-1636- if ($sqlplus_release =~ /(SP2-0750)|(SP2-0642)/) { ############################################## libdbd-oracle-perl-1.80/.pc/build-without-ld-libray-path.patch/Makefile.PL-1640- delete $ENV{ORACLE_HOME}; libdbd-oracle-perl-1.80/.pc/build-without-ld-libray-path.patch/Makefile.PL:1641: $sqlplus_release = `$sqlplus_exe -S /nolog \@define.sql 2>&1`; libdbd-oracle-perl-1.80/.pc/build-without-ld-libray-path.patch/Makefile.PL-1642- $ENV{ORACLE_HOME} = $x; ############################################## libdbd-oracle-perl-1.80/Makefile.PL-518- sleep 2; # libdbd-oracle-perl-1.80/Makefile.PL:519: system("make $DBD_ORA_OBJ.o CC='$Config{cc}'"); # make a valid .o file. libdbd-oracle-perl-1.80/Makefile.PL-520- ############################################## libdbd-oracle-perl-1.80/Makefile.PL-525- print "by executing: [$make]\n"; libdbd-oracle-perl-1.80/Makefile.PL:526: my @cmds = `$make 2>&1`; libdbd-oracle-perl-1.80/Makefile.PL-527- chomp @cmds; ############################################## libdbd-oracle-perl-1.80/Makefile.PL-1451- my $debug = $::opt_d || $::opt_v; libdbd-oracle-perl-1.80/Makefile.PL:1452: print "Evaluating `$orig`\n" libdbd-oracle-perl-1.80/Makefile.PL-1453- if $debug && !$expand_shellescape{$orig}; ############################################## libdbd-oracle-perl-1.80/Makefile.PL-1455- $cmd =~ s/\$[({](\w+)[})]/mkvar("$1", 1, 0, $level+1)/ge; libdbd-oracle-perl-1.80/Makefile.PL:1456: print " expanded `$cmd`\n" if $debug and $cmd ne $orig; libdbd-oracle-perl-1.80/Makefile.PL:1457: my $result = `$cmd`; libdbd-oracle-perl-1.80/Makefile.PL-1458- $result =~ s/\s+$/ /; # newlines etc to single space ############################################## libdbd-oracle-perl-1.80/Makefile.PL-1620- my $OH_path = $OH; libdbd-oracle-perl-1.80/Makefile.PL:1621: chomp($OH_path = `/usr/bin/cygpath -u $OH_path`) if $^O eq 'cygwin' && $OH; libdbd-oracle-perl-1.80/Makefile.PL-1622- ############################################## libdbd-oracle-perl-1.80/Makefile.PL-1637- close FH; libdbd-oracle-perl-1.80/Makefile.PL:1638: my $sqlplus_release = `$sqlplus_exe -S /nolog \@define.sql 2>&1`; libdbd-oracle-perl-1.80/Makefile.PL-1639- if ($sqlplus_release =~ /(SP2-0750)|(SP2-0642)/) { ############################################## libdbd-oracle-perl-1.80/Makefile.PL-1643- delete $ENV{ORACLE_HOME}; libdbd-oracle-perl-1.80/Makefile.PL:1644: $sqlplus_release = `$sqlplus_exe -S /nolog \@define.sql 2>&1`; libdbd-oracle-perl-1.80/Makefile.PL-1645- $ENV{ORACLE_HOME} = $x;