http://qs1969.pair.com?node_id=228557


in reply to Here's the offending line of code, HTH
in thread ActiveState's PerlApp is causing an odd problem with IO:Socket

I think you may need to use a later version of ActivePerl as well (at least build 628 or later). I believe your problem is related to the overriding of CORE::GLOBAL::require by PerlApp. The require statement has both runtime and compiletime aspects, and in earlier versions the compiletime aspects are suppressed when require has been overriden.

The problem is that the statement

my $sel = new IO::Select $sock;

uses indirect object syntax. Directly above is the require statement:

require IO::Select;

With a non-overridden require, it will create the IO::Select package at compile time and the statement above is compiled as

my $sel = IO::Select->new($sock);

Without the compiletime definition of the IO::Select package, Perl compiles it as

my $sel = new($sock->IO::Select());

because the IO::Socket module had already defined a new() sub at this time.

Another "fix" would be to add a

use IO::Select;

line to the top of your script.