Quantcast
Channel: perl.dbi.users
Viewing all 225 articles
Browse latest View live
↧

Fwd: DBD::CSV attempt to free unreferenced scalar during globaldestruction (3 messages)

January 16, 2017, 3:09 pm
$
0
0
Hi Ron,

Thanks for taking the time to have a look. I see you are using 5.20.2,
could it be that your installed modules are not at the same version as
mine? Sorry for not being more detailed in my report. I've updated the
'cpanfile' to lock to specific versions I'm using and removed the
'quote_empty' option as it is only in Text::CSV_XS >= 1.18
<https://github.com/Tux/Text-CSV_XS/commit/f9133e3684f45a6613002f055e3010743d3ea855>
and
it is not required for this.

I'd be grateful if you could fetch and re-run - without quote_empty
updating modules shouldn't be required (I just ran with Text::CSV_XS
version 1.17 as a check).

Roy

On 17 January 2017 at 10:51, Ron Savage <ron@savage.net.au> wrote:

> Hi Roy
>
> I ran your code - unsuccessfully - and added the output as a comment to
> your gist.
>
>
> On 16/01/17 20:54, Roy Storey wrote:
>
>> Hello,
>>
>> I'm here looking for help with an issue I'm having with DBD::CSV.
>>
>> Specifically, I'm attempting to use the 'after_parse' callback to handle
>> a csv file with a data defined variable number of columns and hit a
>> warning on an attempt to free unreferenced scalar during global
>> destruction.
>>
>> I've prepared a minimal example at
>> https://gist.github.com/kiwiroy/fa0c737ff3f298cb064e554505bc4495 so show
>> the issue. The two test scripts process the 'input.csv' with Text::CSV
>> and DBD::CSV respectively and only the latter exhibits the behaviour.
>>
>> It appears to be 5.24.0 specific. I'm using default perlbrew built perls.
>>
>> Is there something I'm missing or doing wrong?
>>
>> Thanks in advance.
>>
>> Roy
>>
>>
>>
> --
> Ron Savage - savage.net.au
>
↧
Search

FetchHashKeyName emits invalid keys for utf8 fieldnames (2 messages)

February 24, 2017, 1:51 pm
$
0
0
Using DBI v 1.636

$dbi->{FetchHashKeyName}=’NAME_lc’ or NAME_uc apparently produces different keys from ‘lc’ and ‘uc’ functions for fieldnames containing non-ascii characters.

For example, ‘ämne-Abc’ with FetchHashKeyName=NAME_lc results in result key ‘\x{0}\x{0}mne-abc’

----
Summary of my perl5 (revision 5 version 24 subversion 0) configuration:

Platform:
osname=linux, osvers=2.6.32-642.6.2.el6.x86_64, archname=x86_64-linux
uname='linux yonkyo.local 2.6.32-642.6.2.el6.x86_64 #1 smp wed oct 26 06:52:09 utc 2016 x86_64 x86_64 x86_64 gnulinux '
config_args='-de -Dprefix=/opt/perlbrew/perls/perl-5.24.0 -Aeval:scriptdir=/opt/perlbrew/perls/perl-5.24.0/bin'
hint=recommended, useposix=true, d_sigaction=define
useithreads=undef, usemultiplicity=undef
use64bitint=define, use64bitall=define, uselongdouble=undef
usemymalloc=n, bincompat5005=undef
Compiler:
cc='cc', ccflags ='-fwrapv -fno-strict-aliasing -pipe -fstack-protector -I/usr/local/include -D_LARGEFILE_SOURCE -D_FILE_OFFSET_BITS=64 -D_FORTIFY_SOURCE=2',
optimize='-O2',
cppflags='-fwrapv -fno-strict-aliasing -pipe -fstack-protector -I/usr/local/include'
ccversion='', gccversion='4.4.7 20120313 (Red Hat 4.4.7-17)', gccosandvers=''
intsize=4, longsize=8, ptrsize=8, doublesize=8, byteorder=12345678, doublekind=3
d_longlong=define, longlongsize=8, d_longdbl=define, longdblsize=16, longdblkind=3
ivtype='long', ivsize=8, nvtype='double', nvsize=8, Off_t='off_t', lseeksize=8
alignbytes=8, prototype=define
Linker and Libraries:
ld='cc', ldflags =' -fstack-protector -L/usr/local/lib'
libpth=/usr/local/lib /usr/lib /lib/../lib64 /usr/lib/../lib64 /lib /lib64 /usr/lib64 /usr/local/lib64
libs=-lpthread -lnsl -lgdbm -ldb -ldl -lm -lcrypt -lutil -lc
perllibs=-lpthread -lnsl -ldl -lm -lcrypt -lutil -lc
libc=libc-2.12.so, so=so, useshrplib=false, libperl=libperl.a
gnulibc_version='2.12'
Dynamic Linking:
dlsrc=dl_dlopen.xs, dlext=so, d_dlsymun=undef, ccdlflags='-Wl,-E'
cccdlflags='-fPIC', lddlflags='-shared -O2 -L/usr/local/lib -fstack-protector'


Characteristics of this binary (from libperl):
Compile-time options: HAS_TIMES PERLIO_LAYERS PERL_COPY_ON_WRITE
PERL_DONT_CREATE_GVSV
PERL_HASH_FUNC_ONE_AT_A_TIME_HARD PERL_MALLOC_WRAP
PERL_PRESERVE_IVUV USE_64_BIT_ALL USE_64_BIT_INT
USE_LARGE_FILES USE_LOCALE USE_LOCALE_COLLATE
USE_LOCALE_CTYPE USE_LOCALE_NUMERIC USE_LOCALE_TIME
USE_PERLIO USE_PERL_ATOF
Locally applied patches:
Devel::PatchPerl 1.42
Built under linux
Compiled at Nov 3 2016 12:25:49
%ENV:
PERLBREW_BASHRC_VERSION="0.75"
PERLBREW_HOME="/home/chris/.perlbrew"
PERLBREW_MANPATH="/opt/perlbrew/perls/perl-5.24.0/man"
PERLBREW_PATH="/opt/perlbrew/bin:/opt/perlbrew/perls/perl-5.24.0/bin"
PERLBREW_PERL="perl-5.24.0"
PERLBREW_ROOT="/opt/perlbrew"
PERLBREW_VERSION="0.75"
@INC:
/opt/perlbrew/perls/perl-5.24.0/lib/site_perl/5.24.0/x86_64-linux
/opt/perlbrew/perls/perl-5.24.0/lib/site_perl/5.24.0
/opt/perlbrew/perls/perl-5.24.0/lib/5.24.0/x86_64-linux
/opt/perlbrew/perls/perl-5.24.0/lib/5.24.0
.
---

Test case script
=====================================

use strict;
use utf8;
use Test::More tests => 26;
use Data::Dumper;

use DBI;

my $dbi=DBI->connect(
'dbi:Pg:dbname=test_db',
'chris',
'',
{
pg_enable_utf8 => 1,
}
);

my @expect=(
[ 'NAME', "ABc", "ABc" ],
[ 'NAME_uc', "ABc", "ABC" ],
[ 'NAME_lc', "ABc", "abc" ],

[ 'NAME', "てすと-ABc", "てすと-ABc" ],
[ 'NAME_uc', "てすと-Abc", "てすと-ABC" ],
[ 'NAME_uc', "てすと-Abc", "てすと-ABC" ],
[ 'NAME_lc', "てすと-Abc", "てすと-abc" ],
[ 'NAME_lc', "てすと-Abc", "てすと-abc" ],

[ 'NAME', "ÄMNE-Abc", "ÄMNE-Abc" ],
[ 'NAME_uc', "ÄMNE-Abc", "ÄMNE-ABC" ],
[ 'NAME_uc', "ämne-Abc", "ÄMNE-ABC" ],
[ 'NAME_lc', "ämne-Abc", "ämne-abc" ],
[ 'NAME_lc', "ÄMNE-Abc", "ämne-abc" ],
);

foreach my $e (@expect) {
my($case,$as,$fld)=@$e;

my $val;
if($case eq 'NAME_uc') {
$val = uc($as);
} elsif($case eq 'NAME_lc') {
$val = lc($as);
} else {
$val = $as;
}

is($val,$fld,"case-converted $as to $case");

$dbi->{FetchHashKeyName} = $case;

my $row=$dbi->selectrow_hashref(qq{ select now() as "$as" });

ok(exists $row->{$fld},"hashref $case") or diag(Dumper $row);
}


Regards,
Chris Hutchinson
↧
↧

Question on FetchHashKeyName (5 messages)

February 28, 2017, 10:37 am
$
0
0
Hello All,

I have been using DBI for some years with MySQL, PostgreSQL, SQLite and Oracle. When using DBI with Oracle I always set FetchHashKeyName to NAME_lc.

Over the weekend I was prototyping a new system and I wanted to use SQLite since I was somewhat offline. All of the hash keys were lower-case by default, but the protocol I was trying to adhere to was using camelCase.

So my question is (and is has possibly been responded to before):

- Would it be possible to have FetchHashKeyName preserve case? so if a database was using camelCase this would be preserved.

Our basis datamodel is encapsulated in views for separate service/application/protocol implementations, so if I would get the views to adhere to the protocol, I would not have to translated the hash keys (and maintain the translation dictionary afterwards.

I checked some FAQ without luck (https://www.fnal.gov/docs/products/perl/pod/site_perl/DBI/FAQ.html), which however seem a bit obsolete (last update 1997) and I cannot find any trace of the FAQ on MetaCPAN.

jonasbn
—
pauseid: JONASBN
email: jonasbn@cpan.org
twitter: @jonasbn
blog: https://lastmover.wordpress.com/




↧

DBD::SQLAnywhere SEGV when Oracle handle exists (7 messages)

March 2, 2017, 2:54 pm
$
0
0
DBD::SQLAnywhere seems to work ok for Sybase IQ, but if I first create a
DBD:Oracle handle, the SQLAnywhere connect hangs for a while, and
eventually segfaults. FYI on redhat Linux.
↧

DBD::mysql new development release, test our unicode improvements! (1 message)

March 4, 2017, 12:30 am
$
0
0
(if you rather read a website than plain text, this is also on my
site: https://huntingbears.nl/2017/03/02/dbdmysql-even-more-utf8-issues-fixed-super-ci/)

In my previous mail
(https://huntingbears.nl/2016/12/14/dbdmysql-all-your-utf-8-bugs-are-belong-to-us/)
I explained how many utf-8 related issues are now fixed in the latest
DBD::mysql development release, and I asked for feedback and testing
from our users.

Even better utf-8 handling
----------------------------------
I'm happy to inform you that, thanks to your feedback, we've now
released yet another development version, with even more UTF8 issues
fixed. Tanabe Yoshinori reported that column names and database
warnings were not properly encoded and prolific contributor Pali Rohár
fixed that issue, and much more.

Serialization issue under taint mode
----------------------------------------------
One other issue which was reported by amavisd users has to do with how
perl stores values internally under taint mode, which is the default
way amavisd is run. This is now fixed, see for more information
https://github.com/perl5-dbi/DBD-mysql/issues/78

Extreme CI testing setup
--------------------------------
And Pali also modified our Travis setup so we now do continuous
integration testing not only on many different perl versions, but also
using many different MySQL and MariaDB versions. This uncovered many
smaller and larger issues and we can compile again all the way back
with MySQL against version 4 if you would want that (and we had
multiple people wanting that and filing bug reports for this in the
past). See our .travis.yml file here:
https://github.com/perl5-dbi/DBD-mysql/blob/master/.travis.yml

This also lead to Pali discovering a use-after-free security issue in
libmysqlclient which was fixed in MySQL 5.6 and up but still present
in 5.5 and also in MariaDB. It got assigned CVE identifier
CVE-2017-3302 -
https://cve.mitre.org/cgi-bin/cvename.cgi?name=CVE-2017-3302 - see
for more info this thread on oss-security:
http://www.openwall.com/lists/oss-security/2017/02/11/11 .

Your feedback is welcome!
----------------------------------
Find the full change log below; when all is well on Wednesday 8th of
March we'll release the stable version 4.042, including all these
changes, as well as the changes from the previous post.

You can leave your feedback via the DBI-users mailing list:
http://lists.perl.org/list/dbi-users.html or using our GitHub page:
https://github.com/perl5-dbi/DBD-mysql/


2017-02-28 change log of version 4.041_2
----------------------------------------------------------
* Statement handle now also has mysql_sock attribute, just as database handle.
(by Pali)
* Fix type conversions for magic types. Issue reported by Dmitriy Yatsenko and
Giovanni Bechis, fix by Pali.
https://lists.amavis.org/pipermail/amavis-users/2016-December/004674.html
https://github.com/perl5-dbi/DBD-mysql/issues/78
* Fix UTF8-encoding of table names, field names, warnings and error messages.
Reported by Tanabe Yoshinori, fix by Pali.
https://rt.cpan.org/Public/Bug/Display.html?id=120141
* Fix mysql_auto_reconnect when using mysql_server_prepare (pali). Reported by
Vladimir Marek.
https://github.com/perl5-dbi/DBD-mysql/pull/95
* Improve regex for removing database from dsn (pali)
https://rt.cpan.org/Public/Bug/Display.html?id=118837
* Locate MySQL libs using Devel::CheckLib (pali)
* Support async on Windows (pali)
* Fix test suite on range of older and newer MySQL and MariaDB versions
(https://github.com/perl5-dbi/DBD-mysql/pull/87)
* Fix compilation on MySQL 4.1 (pali)
* Do not leak dangling pointer to mysql result (pali)
* Fix logic when assigning to variable bind_comment_placeholders (pali)
* mysql_fd() still returned file descriptor after closing connection.
Reported by Larry Leszczynski, fixed by Pali Rohár.
(https://rt.cpan.org/Public/Bug/Display.html?id=110983)
* Fix parsing configure libs from mysql_config --libs output in Makefile.PL
Libraries in mysql_config --libs output can be specified by library name
with the -l prefix or by absolute path to library name without any prefix.
Parameters must start with a hyphen, so treat all options without leading
hyphen in mysql_config --libs output as libraries with full path.
Partially fixes bug https://rt.cpan.org/Public/Bug/Display.html?id=100898
Fix by Pali Rohár.
* Fix support for magic scalars (pali)
(https://github.com/perl5-dbi/DBD-mysql/pull/76)
↧
↧

(Fwd) Oracle.pm (7 messages)

March 6, 2017, 3:22 pm
$
0
0
----- Forwarded message from Gowtham <shiningstargautam@gmail.com> -----

Date: Mon, 6 Mar 2017 15:40:59 -0600
From: Gowtham <shiningstargautam@gmail.com>
To: Tim.Bunce@pobox.com
Subject: Oracle.pm

Hi Tim,

I feel that you are the right person to check this with.

I am trying to understand the code on Oracle.pm (DBD::Oracle) to debug my perl code which tries to make a connection to an Oracle DB. My code exits on the below piece of code on debug mode and i am unable to establish the reason for it.
DBD::Oracle::db::_login($dbh,$dbname,$user,$auth,$attr) or return undef;

I am unable to find the definition for the subroutine _login() which will help me to understand the reason for returning 'undef'. Could you please kindly advice me.

Correct me if i have reached a wrong email.

Thanks - Gautam

----- End forwarded message -----
↧

Re: [Dbix-class] Strangely does DBIx change table names from MySQL? (1 message)

March 11, 2017, 2:21 pm
$
0
0
DBIC by default follows the convention that table names reflect the entity name in singular. If It detects table names in plural It uses a Lingua::* module to deduce the apropriate singular name, and names the clases with It.

In your case, the table names IS "people", but the generated class name IS "Person", the singular for people.

Admittedly yours IS a bit of an extreme case :-)

This behaviour can be changed, see the docs for DBIC::Schema::Loader and search for an option named like "*inflect*" or something similar (I'm on my cellphone and can't search at the moment :-)

BR
J.

--
Jorge González Villalonga
Ingeniero de Sistemas / Systems Engineer
Red Hat Certified Engineer #140-183-666
Móvil / Cell: (+34) 672 173 200

-----Original Message-----
From: Rajeev Prasad <rp.neuli@yahoo.com>
To: "DBIx::Class User and Developer List" <dbix-class@lists.scsys.co.uk>, "dbi-users@perl.org" <dbi-users@perl.org>, Mysql Mailing List <mysql@lists.mysql.com>, "mysql-index@lists.mysql.com" <mysql-index@lists.mysql.com>
Sent: vie., 10 mar. 2017 17:49
Subject: [Dbix-class] Strangely does DBIx change table names from MySQL?

Hello,
Note: this question is also posted on Stack Overflow, a few minutes back.

|
| While using ./create-schema-mydb.pl I realized that the table name "People" is changed to "Person" in DBIx. I am not sure how? or why?
It is not even a reserved word.

in MySQL:people innoDB utf8

create-schema script:$ cat ./create-schema-mydb.pl
#!/usr/bin/perl

use strict;
use warnings;

use DBIx::Class::Schema::Loader qw/make_schema_at/;

make_schema_at(
"Mydb::Schema",
{debug => 0, dump_directory => "../db/",
generate_pod => 0,},
["dbi:mysql:mydb:localhost:3306", 'mydb', 'password'],
);


It shows up like this after create-schema... note the change in name from People to Person, but inside the .pm file table name is retained as People !!!
Result$ cat Person.pm
use utf8;
package Mydb::Schema::Result::Person;

# Created by DBIx::Class::Schema::Loader
# DO NOT MODIFY THE FIRST PART OF THIS FILE

use strict;
use warnings;

use base 'DBIx::Class::Core';
__PACKAGE__->table("people");
__PACKAGE__->add_columns(
"pplid",
{
data_type => "smallint",
extra => { unsigned => 1 },
is_auto_increment => 1,
is_nullable => 0,
},
...
...

only relevant portion shown above...


Thank you.

Rajeev
|

↧

Re: DBD::SQLAnywhere SEGV when Oracle handle exists (1 message)

April 12, 2017, 7:58 am
$
0
0
The issue was the libclntsh that Oracle was loading conflicted with
SQLAnywhere , updating Oracle libs and recompiling DBD::Oracle fixes it.
On Mar 7, 2017 2:10 PM, "Douglas Wilson" <douglasg.wilson@gmail.com> wrote:

> That does work, but I can't consider it a practical solution for this.
> Through print/warns, I've determined it craps out at
> sacapi->api.sqlany_connect(...), in dbdimp.c, but that's about as far as
> I can get.
>
> I will probably go back to using DBD::Sybase for IQ connections.
> On Mar 7, 2017 10:11 AM, "Martin J. Evans" <bohica@ntlworld.com> wrote:
>
>> On 06-Mar-17 5:38 PM, Douglas Wilson wrote:
>>
>>> After some searching, I tried using the ora_connect_with_default_signals
>>> with INT and CHLD, and tried setting BEQUEATH_DETACH=yes in a local
>>> sqlnet.ora, but still same result.
>>>
>>
>> Try reversing the order in which you connect - if you can.
>>
>>
>> On Mar 4, 2017 5:17 AM, "Martin J. Evans" <bohica@ntlworld.com
>>> <mailto:bohica@ntlworld.com>> wrote:
>>>
>>> On 02-Mar-17 10:54 PM, Douglas Wilson wrote:
>>>
>>> DBD::SQLAnywhere seems to work ok for Sybase IQ, but if I first
>>> create a
>>> DBD:Oracle handle, the SQLAnywhere connect hangs for a while, and
>>> eventually segfaults. FYI on redhat Linux.
>>>
>>>
>>> I don't have the info to hand right now but I've heard similar
>>> reports before. I think it had something to do with the method used
>>> to connect to Oracle and if that method is chosen it captures
>>> SIGCHLD and maybe another signal as well.
>>>
>>> Martin
>>> --
>>> Martin J. Evans
>>> Wetherby, UK
>>>
>>>
>>
↧
Search

DBD::Pg version 3.6.0 released (1 message)

April 25, 2017, 7:51 pm
$
0
0

-----BEGIN PGP SIGNED MESSAGE-----
Hash: RIPEMD160


Version 3.6.0 of DBD::Pg, the Perl DBI driver for PostgreSQL, is
now available. This release fixes some bugs, adds some new
functions, and makes some behavior changes with regards to
returned data types. Also note that the canonical git repo is now:
git://github.com/bucardo/dbdpg.git

Version 3.6.0 of DBD::Pg can be downloaded here:

http://search.cpan.org/dist/DBD-Pg/

Checksums:

f1c4819acb15c2e2e5650e3571f74ba9 DBD-Pg-3.6.0.tar.gz
3e02e946253fd62d48868a9bdd12a9c7a4d7208e DBD-Pg-3.6.0.tar.gz

Complete list of changes:

Version 3.6.0 Released April 17, 2017 (git tag 3.6.0)

- Make sure we do not inadvertently modify the string passed to prepare() when
doing the new backslash escape manipulation.
[Greg Sabino Mullane]
(CPAN ticket #114000)

- Fix bug where $DBD::Pg::DBDPG_DEFAULT not picked up as a magic
string first time it is used in a script.
[Greg Sabino Mullane]
(CPAN ticket #112309)

- Fix UTF8 flag handling in pg_(get|put)copydata
[Dagfinn Ilmari Mannsåker]

- Fix UTF8 double-encoding with pg_enable_utf8 = 0
[Serge Pushkin]
(CPAN ticket #103137)

- Fix bug in quote_name which would fail to quote in some circumstances
(Github Issue #22)

- Allow clean parsing of new Postgres X.Y version format
[Erik Rijkers er at xs4all.nl]

- Add pg_canonical_ids() and pg_canonical_names(), which returns information
about each column in the result set.
[Warstone warstone at list.ru]
(CPAN ticket #106858)

- Map SQL_NUMERIC to PG_NUMERIC (instead of PG_FLOAT8)
[Alice Maz alice at alizemaz.com]
(CPAN ticket #120358)

- Force real, float, and double precision into SvNVs
[Greg Sabino Mullane]
(CPAN ticket #113683 and other places)

- Support for number of rows greater than an "int". Requires support for same
from a future version of libpq before it will work completely.
[Greg Sabino Mullane]
(CPAN ticket #102444)

- Fix skipped test counts in Win32 builds
[Andy Grundman]

- Allow tests to work against Postgres 8.4 by tweaking client_encoding calls.
[Pavel Raiskup praiskup at redhat.com]
(CPAN ticket #116179)

- Silence warnings in t/02attribs.t and t/04misc.t
[Dagfinn Ilmari Mannsåker]

- Support binary COPY format
[Dagfinn Ilmari Mannsåker]

- Ensure tests do not use $ENV{PGSERVICE} or $ENV{PGDATABASE}
[Erik Rijkers]

- Switched canonical repo to git://github.com/bucardo/dbdpg.git

- --
Greg Sabino Mullane greg@turnstep.com
PGP Key: 0x14964AC8 201704251244
http://biglumber.com/x/web?pk=2529DF6AB8F79407E94445B4BC9B906714964AC8
-----BEGIN PGP SIGNATURE-----

iEYEAREDAAYFAlj/fVUACgkQvJuQZxSWSsiCiQCfeq/X1zzYKX85LXulAawhYs0w
w3cAoLwcp0cUvB32xeUZ4GQDH0vwZg5D
=5C26
-----END PGP SIGNATURE-----
↧
↧

Re: Extra nulls inserted with binary data (DBD::ODBC on Win7) (4 messages)

January 28, 2016, 6:33 am
$
0
0
I have the problem whether I use the default DBD::ODBC from Strawberry Perl,
or one built specifically with Unicode disabled.

DBI::db=HASH(0x25f2608) trace level set to 0x6000100/2 (DBI @
0x0/0) in DBI1.634-ithread (pid 1844)
-> prepare for DBD::ODBC::db (DBI::db=HASH(0x25f26e0)~0x25f2608
'Update Room
Set FloorUValue=? WHERE Number=?') thr#679fb8
SQLPrepare Update Room Set FloorUValue=? WHERE Number=?
Processing sql in non-unicode mode for SQLPrepare
<- prepare= ( DBI::st=HASH(0x25f6678) ) [1 items] at db_ODBC.pl line 89
-> execute for DBD::ODBC::st (DBI::st=HASH(0x25f6678)~0x25f3058
'..... ............α@..PA..(B..pB' 1) thr#679fb8
<- execute= ( 1 ) [1 items] at db_ODBC.pl line 90
-> DESTROY for DBD::ODBC::st (DBI::st=HASH(0x25f3058)~INNER) thr#679fb8
<- DESTROY= ( undef ) [1 items] at db_ODBC.pl line 69
3000000040021000400000000000000000000e04000005140000822400000724! ->
DESTROY for DBD::ODBC::db (DBI::db=HASH(0x25f2608)~INNER)
thr#679fb8SQLDisconnect=0
! <- DESTROY= ( undef ) [1 items] during global destruction

--
Jerrad Pierce, Research Assistant 2, NMR Group
617-284-6230x21

↧

Fwd: Re: Extra nulls inserted with binary data (DBD::ODBC on Win7) (1 message)

January 28, 2016, 7:35 am
↧

Re: Help with DBD::Oracle install (3 messages)

February 5, 2016, 12:35 pm
$
0
0
Hi. I don't provide support for DBD::Oracle directly. Please email
dbi-users@perl.org or, if you'd rather not just yet, then something here
will probably help:
https://www.google.com/search?q=dbd-oracle+/usr/ucb/cc:++language+optional+software+package+not+installed

Tim.

On Fri, Feb 05, 2016 at 05:40:52PM +0000, Linn, Steven D CTR (US) wrote:
> Hi Tim,
>
> I have hit a wall as far as trying to get this module to install, so I was
> wondering if you might know where I go from here...I am on a Solaris 10
> server running Oracle 10.2.0. When I run 'make', I get the following
> error...Any help would be greatly appreciated!
>
>
> [root: </.cpan/build/DBD-Oracle-1.74>]
> rsol0018# ls
> CONTRIBUTING.mkd Makefile.PL blib oci.def
> CONTRIBUTORS Oracle.c dbdimp.c oci8.c
> Changes Oracle.h dbdimp.h ocitrace.h
> INSTALL Oracle.xs dbivport.h pm_to_blib
> LICENSE Oracle.xsi examples t
> MANIFEST README hints typemap
> META.json README.help.txt lib
> META.yml README.mkdn mk.pm
> Makefile Todo mkta.pl
> [root: </.cpan/build/DBD-Oracle-1.74>]
> redslsa0sol0018# make
> cc -c -I/opt/oracle/product/10.2.0/client_1/rdbms/public
> -I/opt/oracle/product/10.2.0/client_1/rdbms/demo
> -I/opt/oracle/product/10.2.0/client_1/rdbms/public
> -I/opt/oracle/product/10.2.0/client_1/plsql/public
> -I/opt/oracle/product/10.2.0/client_1/network/public
> -I/usr/perl5/vendor_perl/5.8.4/i86pc-solaris-64int/auto/DBI
> -D_LARGEFILE_SOURCE -D_FILE_OFFSET_BITS=64 -D_TS_ERRNO
> -DPERL_USE_SAFE_PUTENV -xO3 -xspace -xildoff -DVERSION=\"1.74\"
> -DXS_VERSION=\"1.74\" -KPIC
> "-I/usr/perl5/5.8.4/lib/i86pc-solaris-64int/CORE" -DUTF8_SUPPORT
> -DORA_OCI_VERSION=\"10.2.0.5\" -DORA_OCI_102 Oracle.c
> /usr/ucb/cc: language optional software package not installed
> *** Error code 1
> make: Fatal error: Command failed for target `Oracle.o'
>
> Steve Linn
> Data Center, SA
> Brockwell Technology, Inc
> Team IBM (Contractor)
> Steven.D.Linn.ctr@mail.mil
> 256-313-0363
> DSN:897


↧

Re: May CPAN Pull request chalenge (1 message)

February 28, 2016, 8:14 pm
$
0
0
On Fri, May 01, 2015 at 06:34:58PM +0200, jluis@escomposlinux.org wrote:
> Hi Tim,

Hi!

> I have got as a May a assignment your module DBI.

Congratulations :)

> In Neil's message he sugested 3 areas for the pull request:
> """
> Notes on your distribution:
>
> * It has a file 'test.pl' in the top directory.
> The modern convention is for all tests to live in a 't/' directory.

test.pl is more of a manual testing tool - you'll see it has a bunch of
options for command line use. It could simply be renamed to tester.pl :)

> * The distribution has CPAN Testers failures, so you could look at those:
> http://www.cpantesters.org/distro/D/DBI.html

I find http://matrix.cpantesters.org/?dist=DBI+1.633 easier to read.
Most of the failures are for obscure systems like mirbsd and dragonfly
that, I'd guess, you don't have access to. So those would be tricky.
If you have access to Windows then investigating those failures might be
useful.

> * The distribution has CPANTS warnings - check out its page for details:
> http://cpants.cpanauthors.org/dist/DBI

Addressing the 'use strict' and 'use warnings' metrics seems reasonable
at first sight. (I'm less keen on 'consistent version' though.)
Adding a LICENSE file would also be good.

> I would like to take the first suggestion first but do you like me to look
> on other issues?

Feel free to scan the issues in RT and see if any appeal.

> Must I test the changes in all perl releases since 5.008 or using the ones
> available on perlbrew will be enough?

perlbrew versions are fine.

> Thanks for your time

Thank you! Feel free to email or ping me or others on IRC.

Good luck!

Tim.

--
Enviado desde mi teléfono con K-9 Mail.
↧
↧

suppress quoting in prepared sql (13 messages)

April 5, 2016, 9:24 am
$
0
0
I'm generating a sql statement like this:

sth = $mysql_dbh->prepare(
"select sum(column) as columnSum from table where value in ( ? ) and row_date between cast( ? as date) and cast( ? as date) ");

sth->execute( $ValueIDs ,$week_start_date,$week_end_date);

$ValueIDs is a series of unquoted values:

01161,01162,01262,01147,01034,01125,01125,01017,01125,01278,01204,01164

When observed at the mysql server, the sql appears as follows:

select sum(column) as columnSum where value in ( '01161,01162,01262,01147,01034,01125,01125,01017,01125,01278,01204,01164' ) and row_date between cast( '2016-03-29' as date) and
cast( '2016-04-05' as date)

resulting in no data being returned.

When the sql is manually entered as follows:

select sum(column) as columnSum where value in ( 01161,01162,01262,01147,01034,01125,01125,01017,01125,01278,01204,01164 ) and row_date between cast( '2016-03-29' as date) and
cast( '2016-04-05' as date)

The correct values are returned.

How can I suppress the quoting for the IN clause?


↧

Re: DBI Utility Functions - more documentation? (2 messages)

April 17, 2016, 3:40 pm
$
0
0
Hello John.

The DBI::hash function simply returns an integer that hash been derived
from a string by some maths. See https://en.wikipedia.org/wiki/Hash_function

That kind of 'hash' is (mostly) unrelated to a Perl hash like my %foo;
also known as an associative array.

I've CC'd this to the dbi-users mailing list. If you reply with more
details about what you're trying to achieve then I'm sure you'll get
some useful replies.

Meanwhile I'll clarify the docs of the DBI::hash function. Thanks.

Tim.

On Fri, Apr 15, 2016 at 06:45:19PM +0000, John Martel wrote:
> Tim,
>
> While reading through your DBI documentation in CPAN, I came across `DBI::hash' under the `DBI Utility
> Functions' header and
>
> was intrigued about how to `store hash values in a database'. The example and verbiage is very sparse
> here, so I was wondering if
>
> there was any other documentation. I just want to know how a hash can be stored in a database using
> DBI. I have your eBook version of
>
> `Programming the Perl DBI', but I didn't find anything when I searched for `DBI::hash'.
>
>
>
> John Martel | Programmer / Analyst, Data Services | KBM Group | Part of the Wunderman Network
> (Tel) 303 228 5051 | (Fax) 303 926 1367 | (Mob) 720 473 9000 | kbmg.com
> 2051 Dogwood Street, Suite 220 | Louisville, CO 80027
> [1]John.Martel@kbmg.com
>
>
>
> [2]cid:image001.png@01D11719.76FB7FB0[3]cid:image003.png@01D04A97.81E303C0
>
> This email - including attachments - may contain confidential information. If you are not the intended
> recipient, do not copy, distribute or act on it. Instead, notify the sender immediately and delete the
> message.
>
>
>
>
>
> --------------------------------------------------------------------------------------------------------
>
> This email - including attachments - may contain confidential information. If you are not the intended
> recipient, do not copy, distribute or act on it. Instead, notify the sender immediately and delete the
> message.
>
> --------------------------------------------------------------------------------------------------------
>
> References
>
> Visible links
> 1. mailto:Aundra.Thompson@kbmg.com



↧
Search

help to connect (6 messages)

May 12, 2016, 7:47 am
$
0
0
Hi,

I've been trying many differents things with the following error, but nothing seems to be working.


Let me start to explain my problem from the beginning.

(Perl version: v5.10.)

I use a configuration file that I parse using Config::General::ParseConfig. This file is encoded in UTF8 as shown below:

$ file config/application.conf
config/application.conf: UTF-8 Unicode English text


In this configuration file, there is a field called 'target_db_list_default_password' which contains a default password to be used for my monitoring.
This password is then used in conjunction with DBI->connect() method primarily to contact an Oracle Database instance.

I always get the following message at execution:

Perl Error message: DBI connect('MY_DB','halfonz',...) failed:
ORA-01017: invalid username/password;
logon denied (DBD ERROR: OCISessionBegin) at /home/jeff.elias/Projects/DBA_SOURCES/branches/develop-next/Templates/Projet Perl simple/src/libs/Common/DbConnection.pm line 210


The password cannot be changed that easily. I've printed out the password I get back and copy-pasted it into a SQL Developer new connection dialog then tried to connect and it worked.
So, my conclusion is that the password can be considered as the OK.

The password (which is normally the good one) contains several special and accented characters as follows: _é+#à.

To try to avoid to disturb you for nothing, I've also tried on a server with perl 5.8.8 installed but it didn't work neither.

Just to test, I've changed the username and password without accented characters and it worked.

Do you have any idea on what I can do (except changing the password) ?



Best Regards,





Jefferson ELIAS








Service Applications Informatiques

Database Administrator

Tel.: +32 4 366 83 56

Fax: +32 4 366 72 99








Email : jefferson.elias@chu.ulg.ac.be

Email DBA : db.sai@chu.ulg.ac.be

















↧

Nedd your help to get DBD:Sybase working to connect to SQL Server (4 messages)

May 16, 2016, 7:02 am
$
0
0
Dear Experts,

I am new to perl and I really need your help. I need your help for a perl
DBD:sybase module i am using.

I am trying to connect to a MS SQL Server from a linux server. Below are
the details and the error message.

Request you to let me know how I can fix it. I will provide any more logs
which you may require. For now, below are the details.

Thank you very much. Looking forward for your assistance.


Brief Description
I have freetds, DBI and DBD:Sybase installated. When i TSQL to a sql server
is works fine, but when i try to connect form a perl script it fails with
the error "REquested server name not found". by testing i have noticed it
may be using $HOME/interfaces file instead of freetds.conf file.

cat /etc/*release

Kernel Release: Red Hat Enterprise Linux 6.4

Kernel Architecture: x86_64

Packages Release: Red Hat Enterprise Linux Server release 6.5 (Santiago)

Red Hat Enterprise Linux Server release 6.5 (Santiago)
Red Hat Enterprise Linux Server release 6.5 (Santiago)


[sybase@1636541cllapp15 ~]$ perl -V
Summary of my perl5 (revision 5 version 10 subversion 1) configuration:

Platform:
osname=linux, osvers=2.6.18-402.el5, archname=x86_64-linux-thread-multi
uname='linux x86-027.build.eng.bos.redhat.com 2.6.18-402.el5 #1 smp thu
jan 8 06:22:34 est 2015 x86_64 x86_64 x86_64 gnulinux '
config_args='-des -Doptimize=-O2 -g -pipe -Wall -Wp,-D_FORTIFY_SOURCE=2
-fexceptions -fstack-protector --param=ssp-buffer-size=4 -m64
-mtune=generic -DDEBUGGING=-g -Dversion=5.10.1 -Dmyhostname=localhost
-Dperladmin=root@localhost -Dcc=gcc -Dcf_by=Red Hat, Inc. -Dprefix=/usr
-Dvendorprefix=/usr -Dsiteprefix=/usr/local
-Dsitelib=/usr/local/share/perl5 -Dsitearch=/usr/local/lib64/perl5
-Dprivlib=/usr/share/perl5 -Darchlib=/usr/lib64/perl5
-Dvendorlib=/usr/share/perl5/vendor_perl
-Dvendorarch=/usr/lib64/perl5/vendor_perl -Dinc_version_list=5.10.0
-Darchname=x86_64-linux-thread-multi -Dlibpth=/usr/local/lib64 /lib64
/usr/lib64 -Duseshrplib -Dusethreads -Duseithreads -Duselargefiles
-Dd_dosuid -Dd_semctl_semun -Di_db -Ui_ndbm -Di_gdbm -Di_shadow -Di_syslog
-Dman3ext=3pm -Duseperlio -Dinstallusrbinperl=n -Ubincompat5005
-Uversiononly -Dpager=/usr/bin/less -isr -Dd_gethostent_r_proto
-Ud_endhostent_r_proto -Ud_sethostent_r_proto -Ud_endprotoent_r_proto
-Ud_setprotoent_r_proto -Ud_endservent_r_proto -Ud_setservent_r_proto
-Dscriptdir=/usr/bin -Dusesitecustomize'
hint=recommended, useposix=true, d_sigaction=define
useithreads=define, usemultiplicity=define
useperlio=define, d_sfio=undef, uselargefiles=define, usesocks=undef
use64bitint=define, use64bitall=define, uselongdouble=undef
usemymalloc=n, bincompat5005=undef
Compiler:
cc='gcc', ccflags ='-D_REENTRANT -D_GNU_SOURCE -fno-strict-aliasing
-pipe -fstack-protector -I/usr/local/include -D_LARGEFILE_SOURCE
-D_FILE_OFFSET_BITS=64',
optimize='-O2 -g -pipe -Wall -Wp,-D_FORTIFY_SOURCE=2 -fexceptions
-fstack-protector --param=ssp-buffer-size=4 -m64 -mtune=generic',
cppflags='-D_REENTRANT -D_GNU_SOURCE -fno-strict-aliasing -pipe
-fstack-protector -I/usr/local/include'
ccversion='', gccversion='4.4.7 20120313 (Red Hat 4.4.7-14)',
gccosandvers=''
intsize=4, longsize=8, ptrsize=8, doublesize=8, byteorder=12345678
d_longlong=define, longlongsize=8, d_longdbl=define, longdblsize=16
ivtype='long', ivsize=8, nvtype='double', nvsize=8, Off_t='off_t',
lseeksize=8
alignbytes=8, prototype=define
Linker and Libraries:
ld='gcc', ldflags =' -fstack-protector'
libpth=/usr/local/lib64 /lib64 /usr/lib64
libs=-lresolv -lnsl -lgdbm -ldb -ldl -lm -lcrypt -lutil -lpthread -lc
perllibs=-lresolv -lnsl -ldl -lm -lcrypt -lutil -lpthread -lc
libc=, so=so, useshrplib=true, libperl=libperl.so
gnulibc_version='2.12'
Dynamic Linking:
dlsrc=dl_dlopen.xs, dlext=so, d_dlsymun=undef, ccdlflags='-Wl,-E
-Wl,-rpath,/usr/lib64/perl5/CORE'
cccdlflags='-fPIC', lddlflags='-shared -O2 -g -pipe -Wall
-Wp,-D_FORTIFY_SOURCE=2 -fexceptions -fstack-protector
--param=ssp-buffer-size=4 -m64 -mtune=generic'


Characteristics of this binary (from libperl):
Compile-time options: MULTIPLICITY PERL_DONT_CREATE_GVSV
PERL_IMPLICIT_CONTEXT PERL_MALLOC_WRAP
USE_64_BIT_ALL
USE_64_BIT_INT USE_ITHREADS USE_LARGE_FILES
USE_PERLIO USE_REENTRANT_API USE_SITECUSTOMIZE
Built under linux
Compiled at Mar 13 2015 07:49:15
%ENV:
PERL5LIB="/usr/local/lib64/perl5:/usr/lib64/perl5"
@INC:
/usr/local/lib64/perl5
/usr/lib64/perl5/x86_64-linux-thread-multi
/usr/lib64/perl5/5.10.0
/usr/lib64/perl5
/usr/local/lib64/perl5
/usr/local/share/perl5
/usr/lib64/perl5/vendor_perl
/usr/share/perl5/vendor_perl
/usr/lib64/perl5
/usr/share/perl5
.
[sybase@1636541cllapp15 ~]$


[sybase@1636541cllapp15 ~]$ tsql -C
Compile-time settings (established with the "configure" script)
Version: freetds v0.91
freetds.conf directory: /etc
MS db-lib source compatibility: yes
Sybase binary compatibility: yes
Thread safety: yes
iconv library: yes
TDS version: 4.2
iODBC: no
unixodbc: yes
SSPI "trusted" logins: no
Kerberos: no
[sybase@1636541cllapp15 ~]$


$ tsql -UXXXXXX -S XXXXXX
Password:
locale is "C"
locale charset is "ANSI_X3.4-1968"
using default charset "ISO-8859-1"
1>

#!/usr/bin/perl
#

$ENV{'FREETDSCONF'}='/opt/sybase/etc/freetds.conf';
print $ENV{'FREETDSCONF'};


use DBI;

my $dbh = DBI->connect("DBI:Sybase:server=XXXXXXX", "XXXXXXX", 'XXXXXXX');
die "unable to connect to server $DBI::errstr" unless $dbh;

$dbh->do("use tempdb");

$query = "SELECT * FROM master..sys.sysusers";
$sth = $dbh->prepare ($query) or die "prepare failed\n";
$sth->execute( ) or die "unable to execute query $query error
$DBI::errstr";

$rows = $sth->rows ;
print "$row rows returned by query\n";

while ( @first = $sth->fetchrow_array ) {
foreach $field (@first) {
print "field: $field\n";
}
}

ERROR
--------
DBI connect('server=XXXXXXX,','XXXXXXX',...) failed: OpenClient message:
LAYER = (6) ORIGIN = (8) SEVERITY = (5) NUMBER = (3)
Server XXXXXXXXXX, database
Message String: ct_connect(): directory service layer: internal directory
control layer error: Requested server name not found.
at ./test.pl line 10
unable to connect to server OpenClient message: LAYER = (6) ORIGIN = (8)
SEVERITY = (5) NUMBER = (3)
Server wsvmvsysSQT01, database
Message String: ct_connect(): directory service layer: internal directory
control layer error: Requested server name not found.
Respectfully,
Sumanth
↧
↧

RE: Bundle::DBI and DBD::Oracle failing (14 messages)

June 22, 2016, 12:25 pm
$
0
0
Confirming this email made it through. Slicing the output into multiple messages. Can you help me with this error message?



perl /stl/bin/test.pl

install_driver(Oracle) failed: Can't load '/root/perl5/lib/perl5/x86_64-linux-thread-multi/auto/DBD/Oracle/Oracle.so' for module DBD::Oracle: libstdc++.so.5: cannot open shared object file: No such file or directory at /usr/lib64/perl5/DynaLoader.pm line 190.

at (eval 4) line 3.

Compilation failed in require at (eval 4) line 3.

Perhaps a required shared library or dll isn't installed where expected

at /stl/bin/test.pl line 3.



↧

ORA-12154 - (DBD: login failed) (20 messages)

August 4, 2016, 8:11 am
$
0
0
‰PNG

IHDRx3\ûÌ}
´IDATxìԌ\QÅáSÛ¶mÛ¶VQ£ÆF=ûîSmÛZ{·¶Í¨¶Ýž&µ;\üOòý› Éí‹ýsÄ*…83mI´žžV™à¤™sqx¡æ±Æþù|<¡O¯aÏ\”Y©³5v™ ˆ· $ºáaïkß@¼s qÎÕº‚ç<bÍûW‘&©v/ÄY
ûçi~°±ÓSážÒT6d"i‹*…•Îx$X1äc` |`¾F¼{áF.Bš°I C¼öc`þ‚Í’„4a»1q7°ÞfŒ•À~Vœ&lU£%°¿dàç4§e#¤ kH°%°¯o+ìËÒ¼ðéáIcCh4_Çìð,CG3p„jG^@‚c"e6?DC#ÖN;–>6ڄïÚ_ÇXiG´ù)0EMë@ð‚@ʤ*HžÙáa9 Q©:QGœšQàñ¿wXH`!…Xp¥©Õ¤ìø~¥¨%Õ¡œÜ*R+ªŒà¬5 †TÿÓq]Êÿ.5þ$?‚³¬TõS·Ò„)ô„ŽRi|?=¥KTYÚðéy6SŽÿüËQɾœE©<Ư7œîÓzAï?_"å€։Ò#êà¬0%ÒÓOm1›4ÝúEày¤é5ÕAà–@šRñ/ò¡}s€¹e‡¢ðÿlÛ¶mû½kÛ¶mÛ¶mÛ¶mÛöNò5YiæÌ»VÎJVîß=vN7ºgwnÒcœKP²CoäiûHÍ|Ž½v3ïRñ‡Œû*F§ÅƳè6¦ ]$‡\ÛÁƒ}¹í"=¸7óŒ0ƃƻäy¸ï^ë0ywÚ>’ÊÂg3>ƒ2&ˆüé÷JÀx¯´•ñþ1ú¸ÇWÎÅn¬‘ÃX欦
žà=e"(8…q€qŽq1ò—]áwÈ^5v361>†ìOcc-Œ¤CnìhœÅâW‘\ ³q÷46v2v6î@¾‘û„(øW‘ÿàä„ñ—ŒMY°YÆaƲƻŠß™gšq²±!ÛÇ2ޟôMhìÎX_3V1Öq&¿³‰·Þٍ½Œ9Œÿ±ö™¸ö8ý§±ù“|;%–Æ+
sGqm‹ñ,„ÌgV~Ô!ÚMéŸ+`1ҎgvßJŸï»‘+[ã%ãhŸ›†(ø‘Çù·,lÐxmÅÒAü>ï_—ö;ÌqÚ3ˆ:ßÑö¹^’ÎÈNÈõ¬:‚|‚#’ýùx
YfBWvñ–û•iOâáZÉ8¹‘m¡’¶„hÂ6á뼝¬p—(åe¼Õå¹ðº$Æ%ȧ {7DÁeÉà³È}§]ØÆkÞ Õ“û^aKÛëÂòÌo?vãa<ƒh/4>!Qª4ÿ>C^q˜~EèÓFæ]cl‹''vr<<ž±¹“ù
>Ææ<›Ð7KBÝ&ÂkfÚûŒyèR2à'ƤÏkÆ1juò£°HA
VËo`üטѸY¦iïÑ|@¬ºCÈ|&Ä ‹IN—l´ˆ±¦÷[ÿæïS<£_Äó–‹!|êõûšÐZž¹×Ñ·‘*'z ™®ÛRBuÑmf‚ñÞ#a²ºß$åh“}W£#?hºq †ÒkÃtî…!¬K¿ü´÷;cĪCŒÑL#ŸècL'Õ5ä>¡/ÆøJö3י‹m €4!sÔó<‘¶ŸLõ¤íž{|‚¢DEe§`ö‹Üâ}©ŒßÃg.“kM?žâ»„MXTæéë)ä]/„~Ë<ß±h.((¬Yôd1°Ð,š~?÷+þ”>˜3“©bɞ÷sˆC Çñö<’ùn¢OÂúâíuUÁl9Š~Èç“ÁǐÓLWŸ×k…ƒ·Äk9…òCþŠ°€Çé§ûÅBµÃ@yÐïȔg j|O2ò4\W>Éß®ßxïŠ!
¦„Òçd¹Eökr˜ö2crŒ±:¡{ðgÆ¢ð—Èaö!«ÌŸ\)xjÐk"l‡jO«‚›ÑØk|Ö¨h)¼‹¬mŸýä¾×D¾ÙÇ"[ø:ñ¦1žbP(_Í¢•
u‚çO UÇL(o ‚ÕÃß÷â1žßß#(!ÒíÕSٛ‘3"ºI—4gBEF®u"ƒÖŠÕ.â~÷
eÙgJè¨Ï}YüåaæñÀ/"ÿž÷åÌ5ژ•Á!'ûròv¶šŒ·Ð˜6 „8ÚÂGć2ÿ@cn2÷!Þ}ñYƒEôíHÈ|9?£o2îO´ºœIÔ*‰Ò‡³qO^ÚõŠ-/£ŸÅ„æ"Ɗô7Ý^žD9—‘¬ø?âQ抄»‰>·ùãÁKÅ#çÙï ÝËÏ£òuŸVÁø‹§¨‚EE7¾ +Ä«KX˜}õFÄíd”–ÉFÑ$$ksÍï_'‹ú Ïo­(šóŠô+Êy¾ÏÆ}Þ ìo¼Öxš{ˆ¢_„eŠ÷J­ó~NFžö²Ø—9D˜EFûp@–÷×wHæy;%Ç;àÓRñy—b¼Íº_§¯“ßågã<ی¯pó¼Ïo¹iÐʸ=ì›+ÎQ-Z)…‘4\ÿÙY9mìg–>%½`"ïÍÓ¤¨ò-…†ZÆ5R(&÷ÞÉ{jW©öTäÚ,þvˆCÑå,œN¤Š‘ß°J®7çÕå†G¿ŠÈIҕU¼°¨”ëó—"{¯«CMx-óé¼óà.Ɣ¢ˆüÕ¨a(å1c|‘7¦È0BKpxè©bU%1|Èû¢ã}Êwƒ)'æâ”+)×¥§£ZGùïÆGՐ$ë--ê£ 9)¡†
ðò^à‡óþ)È*BëÇþ‰H…<«W8˜ŒüiڋÙñ¶)õQšô¾ìkÜÆxº.'1ÞM)xÿIií=,þÙ§Š³@º7½Î1]ù¾h9^¦%ÁS(¾-ᴃq;ò']½–È¡H‹ü3Ož y\ÚK)û)žðü¦œÚŒ þ|«Ã
ü-0´NîL•Ð~C£¥q‹ Åø±‰ì£–”ÝVGz5Úc(a¢Ô['³ø?eìBÎIýc¸$GZÚK;¢‚ÁGœ÷n“³Õ'0²mÀ$yÆ©ZC¾²ègÏCÁ{…øý¢àû »ƒü÷Qöd~¨/áÓÖ/<y-ä_Š‚'Ÿ‡‚õ”(/×["ÛÉ6rS¢%ûä÷„«—ák²¯•¯Ô#˙åí$:ëIrܞ9…ì7®—9­
ƈÉ$ñzY,ŽÛ–bo#jL àN’ÈÅ÷>WÕ#Î&´óHŸ·H¾nxԗ¯"¶bÍ;iפOaõðŠk$²:ô;dì(ÇY‹ ««á^ªß—3*R ?€Ñl¦½MŒãƛï:èÛU¶ƒÆuôÝCbö­DŸAòÍÔ
út0ÞØÀºKòÁW%cEXq_þ•ñŽìž Ôý콗f礸#Pè@>ÏÉ%^þáù«IVÆJx~Ù;wΠÙ=¸—1ÿ‘bJRŒnFý¾_je¬^<gY¾ºˆâŠ€$‹­ã&D™åÿô܄ˆâ3ö÷·.~ˆ(Îú¤Ó¢iîIEND®B`‚
↧

(Fwd) DBD::Oracle quote_identifier (2 messages)

August 17, 2016, 1:25 am
$
0
0
----- Forwarded message from "LAWS, MICHAEL H" <ml340k@att.com> -----

Date: Tue, 16 Aug 2016 21:04:20 +0000
From: "LAWS, MICHAEL H" <ml340k@att.com>
To: "timb@cpan.org" <timb@cpan.org>
Subject: DBD::Oracle quote_identifier

Hello,



I was using quote_identifier for table names on an oracle database.

My code uses DBI, which implements the specifics in this case via DBD::Oracle.

It appears to be using backticks which oracle throws an error when it sees an invalid character.

Substituting all instances of backtick with the double quote, from oracle documentation,

Causes it to work and is hopefully still more secure than not using quote functions at all.



Am I missing something or would this be an open or previously closed issue?



Thanks,

Michael Laws

----- End forwarded message -----
↧
Viewing all 225 articles
Browse latest View live
Search