Oh sorry, I meant to say try 2.20, (not 0.20).
Actually, 2.21 is in cvs now though:
cvs -z3 -q -d :pserver:[EMAIL PROTECTED]:/usr/local/cvsroot/freeware checkout
Net-Ping
Sorry for taking so long to get that
SO_BINDTODEVICE socket option installed:
Net::Ping->([$proto[,$def_timeout[,$bytes[,$device]]]]);
This may not fix your "wauna" bug all the
way, but it should still be helpful for
those multi-homed boxes that can't figure
out which is the best network device.
If I don't hear about any problems or
warn spewages, I'll assume it's okay to
PAUSE it up to CPAN...
Thanks,
Rob Brown
On Thu, 20 Jun 2002, David Dyck wrote:
> On Thu, 20 Jun 2002 at 10:13 -0600, Rob Brown <[EMAIL PROTECTED]> wrote:
>
> > Thanks for the patch, but I do not have a 5.8.0 machine
> > to test it on. I've also got some other Makefile.PL
> > setting complaints that cause warn spewages on 5.8.0
> > from Mr Dyck, but he will not test the new code for
> > some reason. Can you test out the cvs source tree for
> > me to make sure it is clean on 5.8.0? Your patches
> > have been applied:
>
> I am sorry if by some communication error it appears
> that I have not tested it.
>
> I think I probably missed your request
> "Can you try version 0.20 from the CVS repository"
>
> > cvs -z3 -q -d :pserver:[EMAIL PROTECTED]:/usr/local/cvsroot/freeware co
>Net-Ping
> > cd Net-Ping
> > perl Makefile.PL
> > make
> > make disttest
>
> Today I tried the above directions, (although I modify the
> Makefile.PL to add
>
> 'INSTALLDIRS' => 'perl',
>
> I still get warnings from
> dd:Net-Ping$ perl Makefile.PL
> WARNING: constants takes a string/number not a hash reference.
> Please inform the author.
> Writing Makefile for Net::Ping
>
>
> So I now have Net::Ping 2.20 installed on my machine
> and repeated my tests
>
>
>
> eg.
> my $host = "wauna";
> use Net::Ping;
> my $p=Net::Ping->new("udp");
> $p->source_verify( 0 );
> $p->ping($host,1) || die "$host down";
>
> where if I leave out the source_verify( 0 );
> ping fails, since pinging wauna
> returns the address for wauna-d, since
> that is the interface on the network
>
> dd:bin$ traceroute wauna
> traceroute to wauna (129.196.180.6), 30 hops max, 40 byte packets
> 1 msfc-agr-dc2-1-15-d (129.196.149.2) 13.401 ms 0.54 ms 0.521 ms
> 2 wauna-d (129.196.148.7) 0.387 ms * 0.38 ms
>
> dd:bin$ traceroute wauna-d
> traceroute to wauna-d (129.196.148.7), 30 hops max, 40 byte packets
> 1 wauna-d (129.196.148.7) 17.995 ms * 0.374 ms
>
> sudo make test passes all your tests also.
>
> If you need some specific let me know,
> my perl is a few days old v5.8.0 w Locally applied patches:
> DEVEL17205
>
> dd:bin$ ls -ld /usr/local/bin/perl
> -rwxr-xr-x 2 root root 2393110 Jun 13 06:35 /usr/local/bin/perl*
>
> I'd be glad to rsync and try again.
>
> David
>
> -----
>
>
>
> >
> >
> > My original request to Mr Dyck has been attached below
> > for your reference. LET ME KNOW IF THIS WORKS OR NOT.
> >
> > Thanks,
> >
> > Rob Brown
> > CPANID: BBB
> >
> > On Mon, 10 Jun 2002, Jarkko Hietaniemi wrote:
> >
> > > Hi, here is a patch I have forgotten to pass on to you: portability
> > > patches for Perl 5.8.0-to-be:
> > >
> > > - raw socket require privileged user on Win2k
> > > - Mac OS Classic has no ICMP support
> > > [...]
> > > End of Patch.
> > >
> > >
> >
> > ---------- Original message ----------
> > Date: Thu, 13 Jun 2002 16:43:07 -0600 (MDT)
> > From: Rob Brown <[EMAIL PROTECTED]>
> > To: David Dyck <[EMAIL PROTECTED]>
> > Cc: Colin McMillen <[EMAIL PROTECTED]>, Rob Brown <[EMAIL PROTECTED]>
> > Subject: Re: Net::Ping perl 5.8.0 warning
> >
> > Mr Dyck:
> >
> > I have no 5.8.0-RC1 box available for testing. I made up
> > the "constants" setting for the Makefile.PL stuff. I didn't
> > realize that it was a valid option. I guess perl 5.8.0
> > wants to start using it though. Can you try version 0.20
> > from the CVS repository:
> >
> >
> > cvs -z3 -q -d :pserver:[EMAIL PROTECTED]:/usr/local/cvsroot/freeware co
>Net-Ping
> > cd Net-Ping
> > perl Makefile.PL
> > make
> > make disttest
> >
> >
> > If it passes on perl 5.8.0, then I'll PAUSE it to CPAN.
> > Either way, let me know what happens.
> >
> >
> > Thanks!
> >
> > -- Rob
> >
> > On Tue, 4 Jun 2002, David Dyck wrote:
> >
> > >
> > > I'm testing Net-Ping-2.19 now, and it passes
> > > my initial test although, perl 5.8.0 (rc1) gives this warning
> > >
> > > dd:Net-Ping-2.19$ perl Makefile.PL
> > > WARNING: constants takes a string/number not a hash reference.
> > > Please inform the author.
> > >
> > > [...]
> >
>
>
