the code I added :

print Dumper( $dbh->{pg_socket} );

if ( defined ( fileno(IO::Handle->new_from_fd($dbh->{pg_socket}, 'r')) ) ) {
  print "defined";
} else {
  print "undefined";
}

and I get :

104
undefined

paolo

2014-10-14 15:42 GMT+02:00 sri <[email protected]>:

> I added this line in the script - print Dumper( $dbh->{pg_socket} ); - and
>> I get
>> $VAR1 = 196;
>>
>
> Interesting, and if you do
> "fileno(IO::Handle->new_from_fd($dbh->{pg_socket}, 'r'))"?
>
> --
> sebastian
>
> --
> You received this message because you are subscribed to the Google Groups
> "Mojolicious" group.
> To unsubscribe from this group and stop receiving emails from it, send an
> email to [email protected].
> To post to this group, send email to [email protected].
> Visit this group at http://groups.google.com/group/mojolicious.
> For more options, visit https://groups.google.com/d/optout.
>

-- 
You received this message because you are subscribed to the Google Groups 
"Mojolicious" group.
To unsubscribe from this group and stop receiving emails from it, send an email 
to [email protected].
To post to this group, send email to [email protected].
Visit this group at http://groups.google.com/group/mojolicious.
For more options, visit https://groups.google.com/d/optout.

Reply via email to