I've been trying to make the DBI Proxy feature work but have run into a snag. I am able to successfully connect from one sun box to another but I am unable to connect from my WIN32 (XP) box to the sun box.
I've started my dbi proxy server with the followning... 
dbiproxy --localport 3333 --mode fork --debug

[download]
and I am able to connect to this server from another sun box and issue a select statement successfully with the following code... 
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();

[download]
But when I run the same code from my XP desktop (actually laptop) I am not able to connect.
Here is the trace dump... 
    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)

[download]
I always seem to get the error "...Cannot log in to DBI::ProxyServer: Unexpected EOF..."
Any Idea's?

Update:
just in case someone wonders, yes, it does appear that I have connectivity to the isfe unix box from my pc... 
>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

[download]

In reply to DBI Proxy connection prob by mifflin

Title:
Use:  <p> text here (a paragraph) </p>
and:  <code> code here </code>
to format your post, it's "PerlMonks-approved HTML":


  • Posts are HTML formatted. Put <p> </p> tags around your paragraphs. Put <code> </code> tags around your code and data!
  • Titles consisting of a single word are discouraged, and in most cases are disallowed outright.
  • Read Where should I post X? if you're not absolutely sure you're posting in the right place.
  • Please read these before you post! —
  • Posts may use any of the Perl Monks Approved HTML tags:
    a, abbr, b, big, blockquote, br, caption, center, col, colgroup, dd, del, details, div, dl, dt, em, font, h1, h2, h3, h4, h5, h6, hr, i, ins, li, ol, p, pre, readmore, small, span, spoiler, strike, strong, sub, summary, sup, table, tbody, td, tfoot, th, thead, tr, tt, u, ul, wbr
  • You may need to use entities for some characters, as follows. (Exception: Within code tags, you can put the characters literally.)
            For:     Use:
    & &amp;
    < &lt;
    > &gt;
    [ &#91;
    ] &#93;
  • Link using PerlMonks shortcuts! What shortcuts can I use for linking?
  • See Writeup Formatting Tips and other pages linked from there for more info.