PERL POE - Irssi + PoCoEasyDBI

You are viewing an archived Text-only version of the thread. To view this thread in it's original format and/or if you want to reply to this thread please [click here]

Author

Irssi + PoCoEasyDBI

Matt Sickler

2007-08-09, 7:28 pm

For some reason EasyDBI does not work when spawned directly inside an
irssi script.
<code>
use strict;
use Glib;
use POE qw(Loop::Glib);
use POE::Component::EasyDBI;
use POE::Session::Irssi;

POE::Component::EasyDBI->spawn(
alias => 'edbi',
dsn => "DBI:mysql:database=mylog2;host=192.168.24.11;port=3306",
username => 'irssi',
password => 'irssi',
alt_fork => 1,

ping_timeout => 120,
);
</code>

If I use POE::Wheel::Run to fork/exec a script that runs the EasyDBI
stuff, it works just fine.
I tried EasyDBI with and without the alt_fork, same effect.
The error I get is "POE::Component::EasyDBI tried 5 times to create a
Wheel and is giving up... at
/usr/lib/perl5/site_perl/5.8.8/POE/Component/EasyDBI.pm line 642. ***
ignoring. "

Ormemar73

2007-08-31, 3:36 am

Shocking hardcore videos!
http://shocking-p0rn-videos.info/thumb.jpg

Sponsored Links