# New Ticket Created by Paweł Pabian
# Please include the string: [perl #83866]
# in the subject line of all future correspondence about this issue.
# <URL: http://rt.perl.org/rt3/Ticket/Display.html?id=83866 >
This happens on many independent machines:
1. DEBIAN
kernel:
Linux b.v.l 2.6.29.2-vs2.3.0.36.12 #1 SMP Fri May 8 16:22:41 CEST 2009 i686
GNU/Linux
rakudo:
This is Rakudo Perl 6, version 2011.01 built on parrot 3.0.0
result:
perl6 -e 'use fatal; my $socket = IO::Socket::INET.new;
$socket.open( "rakudo.org", 80);'
IO::Socket::INET Couldn't create socket.
in 'IO::Socket::INET::open' at line 1
in main program body at line 1
2. MAC OS X
kernel:
Darwin Pawel-Pabians-Mac.local 10.6.0 Darwin Kernel Version 10.6.0: Wed Nov 10
18:13:17 PST 2010; root:xnu-1504.9.26~3/RELEASE_I386 i386 i386
rakudo:
This is Rakudo Perl 6, version 2011.01 built on parrot 3.0.0
result:
perl6 -e 'use fatal; my $s = IO::Socket::INET.new; $s.open("rakudo.org", 80)'
IO::Socket::INET Couldn't create socket.
in 'IO::Socket::INET::open' at line 1
in main program body at line 1
3. UBUNTU
kernel:
Linux bbkr.org 2.6.32-25-generic-pae #44-Ubuntu SMP Fri Sep 17 21:57:48 UTC
2010 i686 GNU/Linux
rakudo:
This is Rakudo Perl 6, version 2011.01 built on parrot 3.0.0
result:
perl6 -e ' use fatal; my $socket = IO::Socket::INET.new;
$socket.open( "rakudo.org", 80 );'
IO::Socket::INET Couldn't create socket.
in 'IO::Socket::INET::open' at line 1
in main program body at line 1
I've tested many sites, both by domain name and by IP address, even localhost
doesn't work. Those machines above are in different networks (so no firewall
issues are involved). And socket code worked fine on older releases.
So I've tried to build Rakudo HEAD revision on one of those machines, and got
such weird result:
4. UBUNTU
kernel:
Linux bbkr.org 2.6.32-25-generic-pae #44-Ubuntu SMP Fri Sep 17 21:57:48 UTC
2010 i686 GNU/Linux
rakudo:
This is Rakudo Perl 6, version 2011.01-25-g03380cd built on parrot 3.0.0
RELEASE_3_0_0-457-gfe658a7
result:
perl6 -e ' use fatal; my $socket = IO::Socket::INET.new;
$socket.open( "rakudo.org", 80 );'
getaddrinfo failed: rakudo.org: Success
in 'IO::Socket::INET::getaddrinfo' at line 5946:CORE.setting
in 'IO::Socket::INET::open' at line 5861:CORE.setting
in main program body at line 1
If any additional data is required please ask bbkr on #perl6.
