Re: DBD-ODBC 1.15 freezes

2008-07-28 Thread Martin Evans

Kristian,

I am extremely sorry but I was away when you posted and I did not see 
your post until I was clearing out a mailbox. If you have still not 
resolved this issue please get back in touch we me and I'll help you 
look in to it.


Martin
--
Martin J. Evans
Easysoft Limited
http://www.easysoft.com

Kristian Oye wrote:

I just upgraded from DBD-ODBC 1.13 to 1.15 using the ActiveState
repository (e.g. ppm install DBD-ODBC) and am now experiencing a new
behavior where re-executing the same prepared statement ~3 times
locks up the current process.

My info: I am running DBD-ODBC 1.15 on Windows XP (and 2003 Server in
our production facility) with ActiveState Perl 5.8.7 (build 815).  I
experience the same issue when connecting to both MSSQL 2000 and 2005
(Microsoft SQL Server  2000 - 8.00.760 (Intel X86) and Microsoft SQL
Server 2005 - 9.00.3042.00 (X64) respectively).

Note: This code *used* to work under 1.13:

# Register any extended switches supported by the map
$sth = $dbh-prepare(exec
FeedEngine..sp_RegisterSupplierSwitch ?, ?, ?, ?, ?);
while(my ($k, $v) = each %{$self-GetExtendedFlags()})
{
Output(ref($self) . ::OnRegisterMap() registering extended switch:
$k);
$sth-execute((
$self-SupplierID(),
$k,
$v-FlagType()
$v-ValidationRule(),
$v-Description()
));
}

I don't know how helpful this is, but this is the last bit of the
trace:

   rebind check char Param 5 (Allows the map to BCP only select files
into the database.)
dbd_st_execute (for hstmt 2433600, rc = 0)
dbd_error2(err_rc=0, what=st_execute/SQLExecute,
handles=(2431348,24313f0,2433600)
SQLRowCount=0 (rows=1)
dbd_st_execute got no rows: resetting ACTIVE, moreResults
- execute= 1 at C:\Sources\IntelliShopper\FeedEngine/FeedEngine/
BaseProcessor.pm line 351 via c:\Sources\IntelliShopper\FeedEngine
\Feeds.pl line 694
[Thu Jun 26 16:22:05 2008]: FeedEngine::Maps::CNet::OnRegisterMap()
registering extended switch: NOCNET2005
 execute DISPATCH (DBI::st=HASH(0x30f532c) rc1/1 @6 g0
ima1041 pid#584
8) at C:\Sources\IntelliShopper\FeedEngine/FeedEngine/BaseProcessor.pm
line 351
via c:\Sources\IntelliShopper\FeedEngine\Feeds.pl line 694
- execute for DBD::ODBC::st (DBI::st=HASH(0x30f532c)~0x30f5260
10072 'NOCNET2005' 1 '[01]' 'Tells the map not to perform any CNet
2005 actions.') thr#23484
c
bind 1 == '10072' (attribs: ), type 0
bind 2 == 'NOCNET2005' (attribs: ), type 0
bind 3 == '1' (attribs: ), type 0
bind 4 == '[01]' (attribs: ), type 0
bind 5 == 'Tells the map not to perform any CNet 2005
actions.' (attribs: ), ty
pe 0
dbd_st_execute
dbd_st_execute (outparams = 0)...
bind 4 == '[01]' (size 4/14/13, ptype 4, otype 1, sqltype 12)
bind 4 == '[01]' (len 4/13, null 0)
bind 4: CTy=1, STy=VARCHAR, CD=80, Sc=0, VM=4.
SQLBindParameter: idx = 4: fParamType=1, name=4, fCtype=1,
SQL_Type = 12, cbColDef=80, scale=0, rgbValue = 30f5dfc, cbValueMax=4,
cbValue = 4
Param value = [01]
   rebind check char Param 4 ([01])
bind 1 == 10072 (size 5/6/5, ptype 5, otype 1, sqltype 4)
bind 1 == '10072' (len 5/5, null 0)
bind 1: CTy=1, STy=INTEGER, CD=5, Sc=5, VM=5.
SQLBindParameter: idx = 1: fParamType=1, name=1, fCtype=1,
SQL_Type = 4, cbColDef=5, scale=5, rgbValue = 2981f7c, cbValueMax=5,
cbValue = 5
Param value = 10072
   rebind check char Param 1 (10072)
bind 3 == 1 (size 1/2/1, ptype 5, otype 1, sqltype 5)
bind 3 == '1' (len 1/1, null 0)
bind 3: CTy=1, STy=SMALLINT, CD=1, Sc=1, VM=1.
SQLBindParameter: idx = 3: fParamType=1, name=3, fCtype=1,
SQL_Type = 5, cbC
olDef=1, scale=1, rgbValue = 30f9f0c, cbValueMax=1, cbValue = 1
Param value = 1
   rebind check char Param 3 (1)
bind 2 == 'NOCNET2005' (size 10/16/15, ptype 5, otype 1, sqltype 12)
bind 2 == 'NOCNET2005' (len 10/15, null 0)
bind 2: CTy=1, STy=VARCHAR, CD=80, Sc=0, VM=10.
SQLBindParameter: idx = 2: fParamType=1, name=2, fCtype=1,
SQL_Type = 12, cbColDef=80, scale=0, rgbValue = 30f8e4c,
cbValueMax=10, cbValue = 10
Param value = NOCNET2005
   rebind check char Param 2 (NOCNET2005)
bind 5 == 'Tells the map not to perform any CNet 2005 actions.' (size
51/59/58, ptype 4, otype 1, sqltype 12)
bind 5 == 'Tells the map not to perform any CNet 2005 actions.' (len
51/58, null 0)
bind 5: CTy=1, STy=VARCHAR, CD=80, Sc=0, VM=51.
SQLBindParameter: idx = 5: fParamType=1, name=5, fCtype=1,
SQL_Type = 12, cbColDef=80, scale=0, rgbValue = 30fc5d4,
cbValueMax=51, cbValue = 51
Param value = Tells the map not to perform any CNet 2005 actions.
   rebind check char Param 5 (Tells the map not to perform any CNet
2005 actions.)
EOF

Has anyone else experienced this problem?




DBI::Gofer howto?

2008-07-28 Thread Brian Millett
I've looked at the DBI::Gofer::Transport::mod_perl to setup a connection pooling server, 
but to be honest, I just can not grok it.  How is it setup?  So my question is has anyone 
set it up?  How, or what are the configuration files.  In the cpan docs, it has


http://search.cpan.org/~timb/GoferTransport-http-1.015/lib/DBI/Gofer/Transport/mod_perl.pm

add_configurations

  DBI::Gofer::Transport::mod_perl-add_configurations( \%hash_of_hashes );

Takes a reference to a hash containing gofer configuration names and their corresponding 
configuration details.


What configurations??  The reference is vague.

Any pointers on how to setup a simple stateless proxy with DBI::Gofer::mod_perl 
would be nice.

Thanks.
--
Brian Millett - [ Delenn and Sinclair, The Gathering]
Do you not have files on the Vorlons?
'Absolutely. Very large files. But nothing is in them, of course.'



signature.asc
Description: OpenPGP digital signature


Re: DBI::Gofer howto?

2008-07-28 Thread Tim Bunce
On Mon, Jul 28, 2008 at 07:11:04AM -0500, Brian Millett wrote:
 I've looked at the DBI::Gofer::Transport::mod_perl to setup a connection 
 pooling server, but to be honest, I just can not grok it.  How is it setup? 

The docs could certainly use some expansion to 'connect the dots'.

  So my question is has anyone set it up?

Er, yes, me! :)

 How, or what are the 
 configuration files.  In the cpan docs, it has

 http://search.cpan.org/~timb/GoferTransport-http-1.015/lib/DBI/Gofer/Transport/mod_perl.pm

 add_configurations

   DBI::Gofer::Transport::mod_perl-add_configurations( \%hash_of_hashes );

 Takes a reference to a hash containing gofer configuration names and their 
 corresponding configuration details.

 What configurations??  The reference is vague.

These: http://search.cpan.org/~timb/DBI/lib/DBI/Gofer/Execute.pm#CONFIGURATION

For simple cases you don't need any configuration.

 Any pointers on how to setup a simple stateless proxy with 
 DBI::Gofer::mod_perl would be nice.

The docs say:

---snip---
The most simple configuration looks like:

Location /gofer
SetHandler perl-script
PerlHandler DBI::Gofer::Transport::mod_perl
/Location
---snip---

did you try that?

Tim.


Re: DBI::Gofer howto?

2008-07-28 Thread Brian Millett

Tim Bunce escribío:

On Mon, Jul 28, 2008 at 07:11:04AM -0500, Brian Millett wrote:
I've looked at the DBI::Gofer::Transport::mod_perl to setup a connection 
pooling server, but to be honest, I just can not grok it.  How is it setup? 


The docs could certainly use some expansion to 'connect the dots'.


 So my question is has anyone set it up?


Er, yes, me! :)

How, or what are the 
configuration files.  In the cpan docs, it has


http://search.cpan.org/~timb/GoferTransport-http-1.015/lib/DBI/Gofer/Transport/mod_perl.pm

add_configurations

  DBI::Gofer::Transport::mod_perl-add_configurations( \%hash_of_hashes );

Takes a reference to a hash containing gofer configuration names and their 
corresponding configuration details.


What configurations??  The reference is vague.


These: http://search.cpan.org/~timb/DBI/lib/DBI/Gofer/Execute.pm#CONFIGURATION

For simple cases you don't need any configuration.


Any pointers on how to setup a simple stateless proxy with DBI::Gofer::mod_perl 
would be nice.


The docs say:

---snip---
The most simple configuration looks like:

Location /gofer
SetHandler perl-script
PerlHandler DBI::Gofer::Transport::mod_perl
/Location
---snip---

did you try that?



Yes I did and got an error:

[Sun Jul 27 18:21:46 2008] [error] [client 127.0.0.1] failed to resolve handler 
`DBI::Gofer::Transport::mod_perl': Can't locate DBI/Gofer/Transport/mod_perl.pm in @INC 
(@INC contains: /home/bpm/development/modperl/_Inline/lib 
/home/bpm/development/modperl/_Inline/lib /home/bpm/development/modperl 
/home/bpm/development/perl/DBI /usr/lib/perl5/5.10.0/i386-linux-thread-multi 
/usr/lib/perl5/5.10.0 /usr/local/lib/perl5/site_perl/5.10.0/i386-linux-thread-multi 
/usr/local/lib/perl5/site_perl/5.10.0 
/usr/lib/perl5/vendor_perl/5.10.0/i386-linux-thread-multi 
/usr/lib/perl5/vendor_perl/5.10.0 /usr/lib/perl5/vendor_perl 
/usr/lib/perl5/site_perl/5.10.0/i386-linux-thread-multi /usr/lib/perl5/site_perl/5.10.0 . 
/etc/httpd) at (eval 22) line 3.\n



I'm using fedora 9 with perl-DBI-1.601-4.fc9.

The DBI::Gofer::Transport::mod_perl does not seem to be installed.

[bpm]$ rpm -ql perl-DBI-1.601-4.fc9.i386 | grep Gofer
/usr/lib/perl5/vendor_perl/5.10.0/i386-linux-thread-multi/DBD/Gofer
/usr/lib/perl5/vendor_perl/5.10.0/i386-linux-thread-multi/DBD/Gofer.pm
/usr/lib/perl5/vendor_perl/5.10.0/i386-linux-thread-multi/DBD/Gofer/Policy
/usr/lib/perl5/vendor_perl/5.10.0/i386-linux-thread-multi/DBD/Gofer/Policy/Base.pm
/usr/lib/perl5/vendor_perl/5.10.0/i386-linux-thread-multi/DBD/Gofer/Policy/classic.pm
/usr/lib/perl5/vendor_perl/5.10.0/i386-linux-thread-multi/DBD/Gofer/Policy/pedantic.pm
/usr/lib/perl5/vendor_perl/5.10.0/i386-linux-thread-multi/DBD/Gofer/Policy/rush.pm
/usr/lib/perl5/vendor_perl/5.10.0/i386-linux-thread-multi/DBD/Gofer/Transport
/usr/lib/perl5/vendor_perl/5.10.0/i386-linux-thread-multi/DBD/Gofer/Transport/Base.pm
/usr/lib/perl5/vendor_perl/5.10.0/i386-linux-thread-multi/DBD/Gofer/Transport/null.pm
/usr/lib/perl5/vendor_perl/5.10.0/i386-linux-thread-multi/DBD/Gofer/Transport/pipeone.pm
/usr/lib/perl5/vendor_perl/5.10.0/i386-linux-thread-multi/DBD/Gofer/Transport/stream.pm
/usr/lib/perl5/vendor_perl/5.10.0/i386-linux-thread-multi/DBI/Gofer
/usr/lib/perl5/vendor_perl/5.10.0/i386-linux-thread-multi/DBI/Gofer/Execute.pm
/usr/lib/perl5/vendor_perl/5.10.0/i386-linux-thread-multi/DBI/Gofer/Request.pm
/usr/lib/perl5/vendor_perl/5.10.0/i386-linux-thread-multi/DBI/Gofer/Response.pm
/usr/lib/perl5/vendor_perl/5.10.0/i386-linux-thread-multi/DBI/Gofer/Serializer
/usr/lib/perl5/vendor_perl/5.10.0/i386-linux-thread-multi/DBI/Gofer/Serializer/Base.pm
/usr/lib/perl5/vendor_perl/5.10.0/i386-linux-thread-multi/DBI/Gofer/Serializer/DataDumper.pm
/usr/lib/perl5/vendor_perl/5.10.0/i386-linux-thread-multi/DBI/Gofer/Serializer/Storable.pm
/usr/lib/perl5/vendor_perl/5.10.0/i386-linux-thread-multi/DBI/Gofer/Transport
/usr/lib/perl5/vendor_perl/5.10.0/i386-linux-thread-multi/DBI/Gofer/Transport/Base.pm
/usr/lib/perl5/vendor_perl/5.10.0/i386-linux-thread-multi/DBI/Gofer/Transport/pipeone.pm
/usr/lib/perl5/vendor_perl/5.10.0/i386-linux-thread-multi/DBI/Gofer/Transport/stream.pm
/usr/share/man/man3/DBD::Gofer.3pm.gz
/usr/share/man/man3/DBD::Gofer::Policy::Base.3pm.gz
/usr/share/man/man3/DBD::Gofer::Policy::classic.3pm.gz
/usr/share/man/man3/DBD::Gofer::Policy::pedantic.3pm.gz
/usr/share/man/man3/DBD::Gofer::Policy::rush.3pm.gz
/usr/share/man/man3/DBD::Gofer::Transport::Base.3pm.gz
/usr/share/man/man3/DBD::Gofer::Transport::null.3pm.gz
/usr/share/man/man3/DBD::Gofer::Transport::pipeone.3pm.gz
/usr/share/man/man3/DBD::Gofer::Transport::stream.3pm.gz
/usr/share/man/man3/DBI::Gofer::Execute.3pm.gz
/usr/share/man/man3/DBI::Gofer::Request.3pm.gz
/usr/share/man/man3/DBI::Gofer::Response.3pm.gz
/usr/share/man/man3/DBI::Gofer::Serializer::Base.3pm.gz
/usr/share/man/man3/DBI::Gofer::Serializer::DataDumper.3pm.gz
/usr/share/man/man3/DBI::Gofer::Serializer::Storable.3pm.gz

Re: DBI::Gofer howto?

2008-07-28 Thread Hendrik Schumacher
I don't use DBI::Gofer, but according to cpan
DBI::Gofer::Transport::mod_perl is in a different package (not DBI). Try
installing GoferTransport-http.

Hendrik

 Tim Bunce escribío:
 On Mon, Jul 28, 2008 at 07:11:04AM -0500, Brian Millett wrote:
 I've looked at the DBI::Gofer::Transport::mod_perl to setup a
 connection
 pooling server, but to be honest, I just can not grok it.  How is it
 setup?

 The docs could certainly use some expansion to 'connect the dots'.

  So my question is has anyone set it up?

 Er, yes, me! :)

 How, or what are the
 configuration files.  In the cpan docs, it has

 http://search.cpan.org/~timb/GoferTransport-http-1.015/lib/DBI/Gofer/Transport/mod_perl.pm

 add_configurations

   DBI::Gofer::Transport::mod_perl-add_configurations( \%hash_of_hashes
 );

 Takes a reference to a hash containing gofer configuration names and
 their
 corresponding configuration details.

 What configurations??  The reference is vague.

 These:
 http://search.cpan.org/~timb/DBI/lib/DBI/Gofer/Execute.pm#CONFIGURATION

 For simple cases you don't need any configuration.

 Any pointers on how to setup a simple stateless proxy with
 DBI::Gofer::mod_perl would be nice.

 The docs say:

 ---snip---
 The most simple configuration looks like:

 Location /gofer
 SetHandler perl-script
 PerlHandler DBI::Gofer::Transport::mod_perl
 /Location
 ---snip---

 did you try that?


 Yes I did and got an error:

 [Sun Jul 27 18:21:46 2008] [error] [client 127.0.0.1] failed to resolve
 handler
 `DBI::Gofer::Transport::mod_perl': Can't locate
 DBI/Gofer/Transport/mod_perl.pm in @INC
 (@INC contains: /home/bpm/development/modperl/_Inline/lib
 /home/bpm/development/modperl/_Inline/lib /home/bpm/development/modperl
 /home/bpm/development/perl/DBI
 /usr/lib/perl5/5.10.0/i386-linux-thread-multi
 /usr/lib/perl5/5.10.0
 /usr/local/lib/perl5/site_perl/5.10.0/i386-linux-thread-multi
 /usr/local/lib/perl5/site_perl/5.10.0
 /usr/lib/perl5/vendor_perl/5.10.0/i386-linux-thread-multi
 /usr/lib/perl5/vendor_perl/5.10.0 /usr/lib/perl5/vendor_perl
 /usr/lib/perl5/site_perl/5.10.0/i386-linux-thread-multi
 /usr/lib/perl5/site_perl/5.10.0 .
 /etc/httpd) at (eval 22) line 3.\n


 I'm using fedora 9 with perl-DBI-1.601-4.fc9.

 The DBI::Gofer::Transport::mod_perl does not seem to be installed.

 [bpm]$ rpm -ql perl-DBI-1.601-4.fc9.i386 | grep Gofer
 /usr/lib/perl5/vendor_perl/5.10.0/i386-linux-thread-multi/DBD/Gofer
 /usr/lib/perl5/vendor_perl/5.10.0/i386-linux-thread-multi/DBD/Gofer.pm
 /usr/lib/perl5/vendor_perl/5.10.0/i386-linux-thread-multi/DBD/Gofer/Policy
 /usr/lib/perl5/vendor_perl/5.10.0/i386-linux-thread-multi/DBD/Gofer/Policy/Base.pm
 /usr/lib/perl5/vendor_perl/5.10.0/i386-linux-thread-multi/DBD/Gofer/Policy/classic.pm
 /usr/lib/perl5/vendor_perl/5.10.0/i386-linux-thread-multi/DBD/Gofer/Policy/pedantic.pm
 /usr/lib/perl5/vendor_perl/5.10.0/i386-linux-thread-multi/DBD/Gofer/Policy/rush.pm
 /usr/lib/perl5/vendor_perl/5.10.0/i386-linux-thread-multi/DBD/Gofer/Transport
 /usr/lib/perl5/vendor_perl/5.10.0/i386-linux-thread-multi/DBD/Gofer/Transport/Base.pm
 /usr/lib/perl5/vendor_perl/5.10.0/i386-linux-thread-multi/DBD/Gofer/Transport/null.pm
 /usr/lib/perl5/vendor_perl/5.10.0/i386-linux-thread-multi/DBD/Gofer/Transport/pipeone.pm
 /usr/lib/perl5/vendor_perl/5.10.0/i386-linux-thread-multi/DBD/Gofer/Transport/stream.pm
 /usr/lib/perl5/vendor_perl/5.10.0/i386-linux-thread-multi/DBI/Gofer
 /usr/lib/perl5/vendor_perl/5.10.0/i386-linux-thread-multi/DBI/Gofer/Execute.pm
 /usr/lib/perl5/vendor_perl/5.10.0/i386-linux-thread-multi/DBI/Gofer/Request.pm
 /usr/lib/perl5/vendor_perl/5.10.0/i386-linux-thread-multi/DBI/Gofer/Response.pm
 /usr/lib/perl5/vendor_perl/5.10.0/i386-linux-thread-multi/DBI/Gofer/Serializer
 /usr/lib/perl5/vendor_perl/5.10.0/i386-linux-thread-multi/DBI/Gofer/Serializer/Base.pm
 /usr/lib/perl5/vendor_perl/5.10.0/i386-linux-thread-multi/DBI/Gofer/Serializer/DataDumper.pm
 /usr/lib/perl5/vendor_perl/5.10.0/i386-linux-thread-multi/DBI/Gofer/Serializer/Storable.pm
 /usr/lib/perl5/vendor_perl/5.10.0/i386-linux-thread-multi/DBI/Gofer/Transport
 /usr/lib/perl5/vendor_perl/5.10.0/i386-linux-thread-multi/DBI/Gofer/Transport/Base.pm
 /usr/lib/perl5/vendor_perl/5.10.0/i386-linux-thread-multi/DBI/Gofer/Transport/pipeone.pm
 /usr/lib/perl5/vendor_perl/5.10.0/i386-linux-thread-multi/DBI/Gofer/Transport/stream.pm
 /usr/share/man/man3/DBD::Gofer.3pm.gz
 /usr/share/man/man3/DBD::Gofer::Policy::Base.3pm.gz
 /usr/share/man/man3/DBD::Gofer::Policy::classic.3pm.gz
 /usr/share/man/man3/DBD::Gofer::Policy::pedantic.3pm.gz
 /usr/share/man/man3/DBD::Gofer::Policy::rush.3pm.gz
 /usr/share/man/man3/DBD::Gofer::Transport::Base.3pm.gz
 /usr/share/man/man3/DBD::Gofer::Transport::null.3pm.gz
 /usr/share/man/man3/DBD::Gofer::Transport::pipeone.3pm.gz
 /usr/share/man/man3/DBD::Gofer::Transport::stream.3pm.gz
 /usr/share/man/man3/DBI::Gofer::Execute.3pm.gz
 /usr/share/man/man3/DBI::Gofer::Request.3pm.gz
 

Re: DBI::Gofer howto?

2008-07-28 Thread Brian Millett

Hendrik Schumacher escribío:

I don't use DBI::Gofer, but according to cpan
DBI::Gofer::Transport::mod_perl is in a different package (not DBI). Try
installing GoferTransport-http.



Ok, thanks, didn't see that.

--
Brian Millett - [ Garibaldi and Jack, Revelations]
Look if I were you, I'd start talking straight because right now
you're in a whole world of trouble.
'You don't even know what trouble is... but you're gonna find out...
real soon.'




signature.asc
Description: OpenPGP digital signature


Re: DBI::Gofer howto?

2008-07-28 Thread Tim Bunce
On Mon, Jul 28, 2008 at 10:57:23AM -0500, Brian Millett wrote:
 Tim Bunce escribío:
 Any pointers on how to setup a simple stateless proxy with 
 DBI::Gofer::mod_perl would be nice.

 The docs say:

 ---snip---
 The most simple configuration looks like:

 Location /gofer
 SetHandler perl-script
 PerlHandler DBI::Gofer::Transport::mod_perl
 /Location
 ---snip---

 did you try that?

 Yes I did and got an error:

 [Sun Jul 27 18:21:46 2008] [error] [client 127.0.0.1] failed to resolve 
 handler `DBI::Gofer::Transport::mod_perl': Can't locate 
 DBI/Gofer/Transport/mod_perl.pm in @INC (@INC contains: 

 The DBI::Gofer::Transport::mod_perl does not seem to be installed.

 [bpm]$ rpm -ql perl-DBI-1.601-4.fc9.i386 | grep Gofer

It'll work beter if you install DBI::Gofer::Transport::mod_perl
which you'll find in the same place as the docs you read:
http://search.cpan.org/~timb/GoferTransport-http/

Tim.


Perl+DBI question [C1]

2008-07-28 Thread Srinivas KATTI
Hi 

I am working on perl assignment which is first perl code in our 
environment, i have come across following problem, pls if you could 
provide your expert consultansy it will be great help to me

I am trying to use DBI in my program (simple program), below is the piece 
of code


#!/usr/bin/perl -w
#use lib '/tools/dev/perl_modules/DBI/1.48/DBI-1.48';

BEGIN {
push @INC,/tools/dev/perl_modules/DBI/1.48/DBI-1.48;
}
use DBI;
use strict;
my $dbh = DBI-connect( 'dbi:Sybase:SNYCTLDBD01',
'glrecadm',
'glrecadm',
{
  RaiseError = 1,
  AutoCommit = 0
}
  ) || die Database connection not made: 
$DBI::errstr;
$dbh-disconnect();

when i execute the above program, get the following error

Can't locate loadable object for module DBI in @INC (@INC contains: 
/usr/perl5/5.00503/sun4-solaris /usr/perl5/5.00503 
/usr/perl5/site_perl/5.005/sun4-solaris /usr/perl5/site_perl/5.005 . 
/tools/dev/perl_modules/DBI/1.48/DBI-1.48) at 
/tools/dev/perl_modules/DBI/1.48/DBI-1.48/DBI.pm line 254
BEGIN failed--compilation aborted at 
/tools/dev/perl_modules/DBI/1.48/DBI-1.48/DBI.pm line 254.
BEGIN failed--compilation aborted at dbp.pl line 7.

**

when i check the DBI.pm code

[EMAIL PROTECTED]:[/tools/dev/perl_modules/DBI/1.48/DBI-1.48] ls -l 
DBI*
-rwxr-xr-x   1 fftstroot  269772 Mar 14  2005 DBI.pm
-rwxr-xr-x   1 fftst307   133636 Jan 20  2005 DBI.xs
-rwxr-xr-x   1 fftst30720392 Dec 14  2004 DBIXS.h
[EMAIL PROTECTED]:[/tools/dev/perl_modules/DBI/1.48/DBI-1.48]

the comments specified in DBI.pm says

# If you get an error here like Can't find loadable object ...
# then you haven't installed the DBI correctly. Read the README
# then install it again.

So is this correct? do i need to install it again Or is it something that 
i am missing or not using correctly? 

Please do let me know if you need any other info to understand/trouble 
shoot my query

Thanking you in advance

Regards
Srinivas Katti

*
This message and any attachments (the message) are confidential, intended 
solely for the addressee(s), and may contain legally privileged information.
Any unauthorised use or dissemination is prohibited. E-mails are susceptible to 
alteration.   
Neither SOCIETE GENERALE nor any of its subsidiaries or affiliates shall be 
liable for the message if altered, changed or
falsified.
  
Ce message et toutes les pieces jointes (ci-apres le message) sont 
confidentiels et susceptibles de contenir des informations couvertes 
par le secret professionnel. 
Ce message est etabli a l'intention exclusive de ses destinataires. Toute 
utilisation ou diffusion non autorisee est interdite.
Tout message electronique est susceptible d'alteration. 
La SOCIETE GENERALE et ses filiales declinent toute responsabilite au titre de 
ce message s'il a ete altere, deforme ou falsifie.
*


Re: Perl+DBI question [C1]

2008-07-28 Thread Jonathan Leffler
On Mon, Jul 28, 2008 at 8:06 AM, Srinivas KATTI [EMAIL PROTECTED]wrote:

 I am working on perl assignment which is first perl code in our
 environment, i have come across following problem, pls if you could
 provide your expert consultansy it will be great help to me

 I am trying to use DBI in my program (simple program), below is the piece
 of code


 
 #!/usr/bin/perl -w
 #use lib '/tools/dev/perl_modules/DBI/1.48/DBI-1.48';

 BEGIN {
push @INC,/tools/dev/perl_modules/DBI/1.48/DBI-1.48;
}



Try /tools/dev/perl_modules -- Perl will add the sub-directories.
See the other directories on @INC for examples.
Or, maybe, you need to add blib to the end of the name you're using.

If you haven't installed DBI yet, do so -- don't try to use it (or build any
DBD modules) until it is installed.  Doing that prevents this sort of
headache.



 use DBI;
 use strict;
 my $dbh = DBI-connect( 'dbi:Sybase:SNYCTLDBD01',
'glrecadm',
'glrecadm',
{
  RaiseError = 1,
  AutoCommit = 0
}
  ) || die Database connection not made:
 $DBI::errstr;
 $dbh-disconnect();

 when i execute the above program, get the following error

 
 Can't locate loadable object for module DBI in @INC (@INC contains:
 /usr/perl5/5.00503/sun4-solaris /usr/perl5/5.00503
 /usr/perl5/site_perl/5.005/sun4-solaris /usr/perl5/site_perl/5.005 .
 /tools/dev/perl_modules/DBI/1.48/DBI-1.48) at
 /tools/dev/perl_modules/DBI/1.48/DBI-1.48/DBI.pm line 254
 BEGIN failed--compilation aborted at
 /tools/dev/perl_modules/DBI/1.48/DBI-1.48/DBI.pm line 254.
 BEGIN failed--compilation aborted at dbp.pl line 7.


 **

 when i check the DBI.pm code

 [EMAIL PROTECTED]:[/tools/dev/perl_modules/DBI/1.48/DBI-1.48] ls -l
 DBI*
 -rwxr-xr-x   1 fftstroot  269772 Mar 14  2005 DBI.pm
 -rwxr-xr-x   1 fftst307   133636 Jan 20  2005 DBI.xs
 -rwxr-xr-x   1 fftst30720392 Dec 14  2004 DBIXS.h
 [EMAIL PROTECTED]:[/tools/dev/perl_modules/DBI/1.48/DBI-1.48]

 the comments specified in DBI.pm says

 # If you get an error here like Can't find loadable object ...
 # then you haven't installed the DBI correctly. Read the README
 # then install it again.

 So is this correct? do i need to install it again Or is it something that
 i am missing or not using correctly?

 Please do let me know if you need any other info to understand/trouble
 shoot my query



-- 
Jonathan Leffler [EMAIL PROTECTED] #include disclaimer.h
Guardian of DBD::Informix - v2008.0513 - http://dbi.perl.org
Blessed are we who can laugh at ourselves, for we shall never cease to be
amused.