mifflin has asked for the wisdom of the Perl Monks concerning the following question:
and I am able to connect to this server from another sun box and issue a select statement successfully with the following code...dbiproxy --localport 3333 --mode fork --debug
But when I run the same code from my XP desktop (actually laptop) I am not able to connect.use warnings; use strict; use DBI; DBI->trace(3); my $dbh = DBI->connect( "dbi:Proxy:hostname=isfe;port=3333;dsn=dbi:Oracle:xxxx", 'xxxx', 'xxxx', {RaiseError => 1, PrintError => 0, AutoCommit => 0} ); my $sql = 'select id, str from sfile'; my $csr = $dbh->prepare($sql); $csr->execute(); while (my ($id, $str) = $csr->fetchrow_array) { print "$id = $str\n"; } $dbh->disconnect();
I always seem to get the error "...Cannot log in to DBI::ProxyServer: Unexpected EOF..."DBI 1.43-ithread default trace level set to 0x0/3 (pid 296) -> DBI->connect(dbi:Proxy:hostname=isfe;port=3333;dsn=dbi:Oracle:p +rod, mwh, ****, HASH(0x15d5338)) -> DBI->install_driver(Proxy) for MSWin32 perl=5.008004 pid=296 ru +id=0 euid=0 install_driver: DBD::Proxy version 0.2004 loaded from C:/Perl/s +ite/lib/DBD/Proxy.pm New DBI::dr (for DBD::Proxy::dr, parent=, id=) dbih_setup_handle(DBI::dr=HASH(0x1b58580)=>DBI::dr=HASH(0x1b08af8) +, DBD::Proxy::dr, 0, Null!) dbih_make_com(Null!, 0, DBD::Proxy::dr, 112, 0) thr#15d4594 <- install_driver= DBI::dr=HASH(0x1b58580) -> connect for DBD::Proxy::dr (DBI::dr=HASH(0x1b58580)~0x1b08af8 ' +hostname=isfe;port=3333;dsn=dbi:Oracle:prod' 'mwh' **** HASH(0x1cf247 +c)) thr#15d4594 1 -> set_err in DBD::_::common for DBD::Proxy::dr (DBI::dr=HASH(0x1b +08af8)~INNER 1 'Cannot log in to DBI::ProxyServer: Unexpected EOF fro +m server at C:/Perl/site/lib/RPC/PlClient.pm line 84. ' ' ') thr#15d4594 !! ERROR: 1 'Cannot log in to DBI::ProxyServer: Unexpected EOF fro +m server at C:/Perl/site/lib/RPC/PlClient.pm line 84. ' (err#1) 1 <- set_err= undef at Proxy.pm line 73 !! ERROR: 1 'Cannot log in to DBI::ProxyServer: Unexpected EOF fro +m server at C:/Perl/site/lib/RPC/PlClient.pm line 84. ' (err#1) <- connect= undef at DBI.pm line 595 -> $DBI::errstr (&) FETCH from lasth=HASH >> DBD::Proxy::dr::errstr <- $DBI::errstr= 'Cannot log in to DBI::ProxyServer: Unexpected EO +F from server at C:/Perl/site/lib/RPC/PlClient.pm line 84. ' DBI connect('hostname=isfe;port=3333;dsn=dbi:Oracle:prod','mwh' +,...) failed: Cannot log in to DBI::ProxyServer: Unexpected EOF from +server at C:/Perl/site/lib/RPC/PlClient.pm line 84. DBI connect('hostname=isfe;port=3333;dsn=dbi:Oracle:prod','mwh',...) f +ailed: Cannot log in to DBI::ProxyServer: Unexpected EOF from server +at C:/Perl/site/lib/RPC/PlClient.pm line 84. at test.pl line 7 -- DBI::END -> disconnect_all for DBD::Proxy::dr (DBI::dr=HASH(0x1b58580)~0x1b +08af8) thr#15d4594 <- disconnect_all= (not implemented) at DBI.pm line 674 via test.p +l line 0 ! -> DESTROY for DBD::Proxy::dr (DBI::dr=HASH(0x1b08af8)~INNER) thr# +15d4594 ! <- DESTROY= undef during global destruction ! <> DESTROY for DBI::dr=HASH(0x1b58580) ignored (inner handle gone)
>ping isfe Pinging isfe.csc.hdsupply.com [172.25.209.30] with 32 bytes of data: Reply from 172.25.209.30: bytes=32 time<10ms TTL=254 Reply from 172.25.209.30: bytes=32 time<10ms TTL=254 Reply from 172.25.209.30: bytes=32 time<10ms TTL=254 Reply from 172.25.209.30: bytes=32 time<10ms TTL=254 Ping statistics for 172.25.209.30: Packets: Sent = 4, Received = 4, Lost = 0 (0% loss), Approximate round trip times in milli-seconds: Minimum = 0ms, Maximum = 0ms, Average = 0ms
|
|---|
| Replies are listed 'Best First'. | |
|---|---|
|
Re: DBI Proxy connection prob
by tachyon (Chancellor) on Oct 04, 2004 at 22:48 UTC | |
by mifflin (Curate) on Oct 04, 2004 at 23:16 UTC | |
by tachyon (Chancellor) on Oct 04, 2004 at 23:30 UTC | |
by mifflin (Curate) on Oct 04, 2004 at 23:20 UTC | |
by tachyon (Chancellor) on Oct 04, 2004 at 23:44 UTC |