Craig A. Berry wrote:
> 
> is now out and is described at:
> 
> <http://nntp.x.perl.org/group/perl.perl5.porters/79048>
> 
> Barring miraculous patch appearances, the following VMS-specific problems
> will stay with us for 5.8.1 final:
> 
> Net::Ping won't work because of its dependence on fcntl().  It also depends
> on the presence of an echo server (port 7), which is not installed by
> default with HP TCP/IP Services, though it is with Multinet.

Net::Ping is using fcntl() to set and clear blocking mode on a Socket. 
In VMS, as in Windows (and Posix? I'll have to check), this is done with
FIONBIO - an ioctl call.  In fact, there is a special check in Net::Ping
to use ioctl() instead of fcntl() for Windows and the values used there
are the same ones used by VMS.  Unfortunately, when I add VMS to that
special check I get the message:

ioctl is not implemented at blib/lib/Net/Ping.pm line 324.

I'm testing with Perl v5.6.1.  Is ioctl() normally included in a VMS
build of 5.8.1?

Mark Berryman

Reply via email to