Package: perl-base
Version: 5.8.4-5
Severity: important

Hi,

dupload on GNU/Hurd breaks like this:

[EMAIL PROTECTED]:~/build$ ../dupload hello_2.1.1-4_hurd-i386.changes 
dupload note: no announcement will be sent.
Uploading (ftp) to ftp-master.debian.org:/pub/UploadQueue/
[ job hello_2.1.1-4_hurd-i386 from hello_2.1.1-4_hurd-i386.changes
 hello_2.1.1-4_hurd-i386.deb, md5sum ok
 hello_2.1.1-4_hurd-i386.changes ok ]
Uploading (ftp) to anonymous-ftp-master (ftp-master.debian.org)
+ FTP passive mode selected
dupload fatal error: Net::FTP: connect: Operation now in progress at
../dupload line 816

I tracked this down to /usr/lib/perl/5.8.4/IO/Socket.pm:115, where
$!{EINPROGRESS} is "" on GNU/Hurd, while it is "115" on GNU/Linux.  If I
remove the test for $!{EINPROGRESS}, dupload works fine.  The reason for
this appears to be that /usr/lib/perl/5.8.4/Errno.pm does not
export any of the ERRNOs:

[EMAIL PROTECTED]:~/build$ grep EINPROGRESS /usr/lib/perl/5.8.4/Errno.pm 
[EMAIL PROTECTED]:~/build$ 

(You the find this file as generated on hurd-i386 at
http://people.debian.org/~mbanck/Errno.pm )

while on GNU/Linux:

nighthawk~$ grep EINPROGRESS /usr/lib/perl/5.8.4/Errno.pm 
        ENOTSOCK EDESTADDRREQ EIO ENOSPC EIDRM EMEDIUMTYPE EINPROGRESS ERANGE
        EINPROGRESS EINTR EINVAL EIO EISCONN EISDIR ELOOP EMFILE EMLINK
sub EINPROGRESS () { 115 }

I think this is due to no general glibc inclusion of <errno.h> in
perl-5.8.4/ext/Errno/Errno_pm.PL, only linux is tested for.  So I guess
either a test for 'gnu' (or whatever perl calls it) should be added or
the 'linux' test be generalized for all glibc-using architectures.


cheers,

Michael


-- 
To UNSUBSCRIBE, email to [EMAIL PROTECTED]
with a subject of "unsubscribe". Trouble? Contact [EMAIL PROTECTED]

Reply via email to