http://qs321.pair.com?node_id=595408

blahblahblah has asked for the wisdom of the Perl Monks concerning the following question:

Hi,

Inspired by the Advanced Perl Programming book, I'm trying to use a POE module for the first time. As part of my script I also want to download a small web page, so I'm trying to use LWP::Simple. When I run my script, it gets to the LWP::Simple::get call and hangs. I have to use task manager to kill it (the cmd prompt won't respond to Ctrl-C). I took out most of my code and reproduced the problem with this simple script:

my $url = "http://wfmu.org/listen.m3u?show=21788&archive=32709"; use LWP::Simple; print "getting $url ...\n"; my $content = LWP::Simple::get($url); die "Problem!" unless defined $content; print "content: $content\n"; use POE qw(Component::RSSAggregator); # bad line __END__ With "bad line" commented out, it works: F:\cgi\wfmu>perl testget.pl getting "http://wfmu.org/listen.m3u?show=21788&archive=32709" content: http://archive.wfmu.org:5555/archive/NU/nu070117.mp3 With "bad line" present, it hangs: F:\cgi\wfmu>perl testget.pl getting "http://wfmu.org/listen.m3u?show=21788&archive=32709"
It works if I just "use POE", so maybe it's specifically the PoCo::RSSAggregator module that's the problem.?

I've poked around in the module source a very little bit looking for the problem, but I didn't see anything. Being completely unfamiliar with how POE works, I thought I'd ask for help before spending a lot of time on something obvious that I might be overlooking.

Thanks for any suggestions,
Joe