On Thu, Sep 09, 2010 at 12:37:43PM -0700, Bill Ward wrote:
> Yes, but doing so is naughty.

Really? Howso?

I ask because I do it in a module of mine.

  http://cpansearch.perl.org/src/PEVANS/IO-Async-0.29/lib/IO/Async/Listener.pm

Namely:

-----
      # This is a bit naughty but hopefully nobody will mind...
      bless $handle, "IO::Socket" if ref( $handle ) eq "GLOB";
-----

-- 
Paul "LeoNerd" Evans

[email protected]
ICQ# 4135350       |  Registered Linux# 179460
http://www.leonerd.org.uk/

Attachment: signature.asc
Description: Digital signature

Reply via email to