diff options
| author | Niko Tyni <ntyni@iki.fi> | 2005-10-19 13:13:11 +0200 |
|---|---|---|
| committer | Niko Tyni <ntyni@iki.fi> | 2005-10-19 13:13:11 +0200 |
| commit | d230c06cb6e8462c2b7b406d5f4f11880900a866 (patch) | |
| tree | b6732534f16377953f4da2f4d8b27dfc599ed765 | |
| parent | 12e7a448c63c79b0e01e2bc6810c5a23669ca741 (diff) | |
| download | smokeping-d230c06cb6e8462c2b7b406d5f4f11880900a866.tar.gz smokeping-d230c06cb6e8462c2b7b406d5f4f11880900a866.tar.xz | |
* (trunk,2.0)/
lib/Smokeping/probes/Curl.pm,
CHANGES:
+ make the Curl probe compatible with Perl 5.6
| -rw-r--r-- | CHANGES | 3 | ||||
| -rw-r--r-- | lib/Smokeping/probes/Curl.pm | 2 |
2 files changed, 4 insertions, 1 deletions
@@ -1,3 +1,6 @@ +* make the Curl probe compatible with Perl 5.6 + -- niko, reported by Ben Eisenbraun <bene *klatsch.org> + 2005/10/19 -- released version 20051019_trunk * get rid of 'Use of uninitialized value' messages when using the Avgratio matcher diff --git a/lib/Smokeping/probes/Curl.pm b/lib/Smokeping/probes/Curl.pm index af5be29..de56758 100644 --- a/lib/Smokeping/probes/Curl.pm +++ b/lib/Smokeping/probes/Curl.pm @@ -263,7 +263,7 @@ sub pingone { my $count = $self->pings($t); for (my $i = 0 ; $i < $count; $i++) { - open(P, "-|", @cmd) or croak("fork: $!"); + open(P, "-|") or exec @cmd; my $val; |