package HTTP::Daemon ;

# Fix a bug on sockname of IO::Socket, that block the app for multi childs with
# the same server opened. Or for a GLOB blessed in a package different than
# IO::Socket, since the socket of the server is blessed to HTTP::Daemon! (I saw the bug only on Win32).

sub sockname {
  #getsockname($_[0]);
  getsockname( fileno($_[0]) );
}