Skip Menu |
 

This queue is for tickets about the Net-Ping-External CPAN distribution.

Report information
The Basics
Id: 30525
Status: open
Priority: 0/
Queue: Net-Ping-External

People
Owner: CHORNY [...] cpan.org
Requestors: dookie22 [...] knology.net
Cc:
AdminCc:

Bug Information
Severity: (no value)
Broken in: (no value)
Fixed in: (no value)



Subject: bug-Net-Ping-External [at] rt.cpan.org
Date: Tue, 06 Nov 2007 16:42:38 -0500
To: bug-Net-Ping-External [...] rt.cpan.org
From: dookie <dookie22 [...] knology.net>
Download (untitled) / with headers
text/plain 967b
Problem using timeout in Debian ie..(timeout => 2) The time out does not work when the program selects "linux" as the %dispatch hash variable. I was able to correct this by adding " -W $args{timeout}" to the end of the /$command /variable. The Section of code within "perl/5.8.4/Net/Ping/External.pm" that contains the code that I changed is listed below. The changes that were added are in bold... # Debian 2.2 OK, RedHat 6.2 OK # -s size option available to superuser... FIXME? sub _ping_linux { my %args = @_; my $command; #for next version # if (-e '/etc/redhat-release' || -e '/etc/SuSE-release') { # $command = "ping -c $args{count} -s $args{size} $args{host}"; # } else { $command = "ping -c $args{count} $args{host} *-W $args{timeout}*"; print "C: $args{timeout}"; # } return _ping_system($command, 0); } This is perl, v5.8.4 built for i386-linux-thread-multi Linux 2.4.27-2-386 #1 Wed Aug 17 09:33:35 UTC 2005 i686 GNU/Linux Debian
Download (untitled) / with headers
text/plain 1.1k
On Tue Nov 06 16:43:17 2007, dookie22@knology.net wrote: Show quoted text
> Problem using timeout in Debian > ie..(timeout => 2) > > The time out does not work when the program selects "linux" as the > %dispatch hash variable. > I was able to correct this by adding " -W $args{timeout}" to the end of > the /$command /variable. > > The Section of code within "perl/5.8.4/Net/Ping/External.pm" that > contains the code that I changed is listed below. > The changes that were added are in bold... > > # Debian 2.2 OK, RedHat 6.2 OK > # -s size option available to superuser... FIXME? > sub _ping_linux { > my %args = @_; > my $command; > #for next version > # if (-e '/etc/redhat-release' || -e '/etc/SuSE-release') { > # $command = "ping -c $args{count} -s $args{size} $args{host}"; > # } else { > $command = "ping -c $args{count} $args{host} *-W $args{timeout}*"; > print "C: $args{timeout}"; > # } > return _ping_system($command, 0); > } > > > > This is perl, v5.8.4 built for i386-linux-thread-multi > Linux 2.4.27-2-386 #1 Wed Aug 17 09:33:35 UTC 2005 i686 GNU/Linux > Debian
Same problem for me and following the existing code it can be identified with /etc/debian_version Martin -- Martin J. Evans Wetherby, UK


This service is sponsored and maintained by Best Practical Solutions and runs on Perl.org infrastructure.

Please report any issues with rt.cpan.org to rt-cpan-admin@bestpractical.com.