FIx to make IO::Socket work on BeOS [rt.cpan.org #53837]

[toddr]

Migrated from rt.cpan.org#53837 (status was 'new')

Requestors:

• njh@bandsman.co.uk

From njh@bandsman.co.uk on 2010-01-20 13:22:23:

IO::Socket gives this error on BeOS:

Your vendor has not defined Socket macro AF_UNIX, used at
/boot/home/config/lib/perl5/5.8.8/BePC-beos/IO/Socket/UNIX.pm line 18


The fix is in IO/Socket.pm at line 22.

Old code:
require IO::Socket::UNIX if ($^O ne 'epoc' && $^O ne 'symbian');

New code:
require IO::Socket::UNIX if ($^O ne 'epoc' && $^O ne 'symbian' && $^O ne
'beos');

From njh@bandsman.co.uk on 2010-08-26 17:02:00:

I have just tried it in 5.12.1 - the problem still exists.

From njh@bandsman.co.uk on 2011-01-02 22:05:06:

5.12.3 is due soon - it would be great if this fix were to be incorporated.