forked from pool/2ping
32 lines
1.0 KiB
Diff
32 lines
1.0 KiB
Diff
|
From c6753e03927cc5f065e3da6a6f735a1691146dd8 Mon Sep 17 00:00:00 2001
|
||
|
From: Jiri Slaby <jirislaby@gmail.com>
|
||
|
Date: Sat, 4 Apr 2015 12:54:27 +0200
|
||
|
Subject: [PATCH] 2ping: fix 'use of uninitialized' warning
|
||
|
|
||
|
With 2ping --listen -6, I see
|
||
|
Use of uninitialized value $opt_intaddr in pattern match (m//) at /usr/bin/2ping line 356.
|
||
|
Check for undef, as there might be one pushed to the array.
|
||
|
|
||
|
Signed-off-by: Jiri Slaby <jirislaby@gmail.com>
|
||
|
---
|
||
|
script/2ping.in | 3 ++-
|
||
|
1 file changed, 2 insertions(+), 1 deletion(-)
|
||
|
|
||
|
diff --git a/script/2ping.in b/script/2ping.in
|
||
|
index 24c00b95ec2f..ff117f9b0fd4 100755
|
||
|
--- a/script/2ping.in
|
||
|
+++ b/script/2ping.in
|
||
|
@@ -350,7 +350,8 @@ if($opt_listen) {
|
||
|
foreach my $opt_intaddr (@working_opt_intaddrs) {
|
||
|
my($sock);
|
||
|
my($is_ipv6) = $opt_ipv6;
|
||
|
- if($opt_ipv6 && $opt_intaddr =~ /^\d{1,3}\.\d{1,3}\.\d{1,3}\.\d{1,3}$/) {
|
||
|
+ if($opt_ipv6 && defined $opt_intaddr &&
|
||
|
+ $opt_intaddr =~ /^\d{1,3}\.\d{1,3}\.\d{1,3}\.\d{1,3}$/) {
|
||
|
$is_ipv6 = 0;
|
||
|
}
|
||
|
my $sockerr = '';
|
||
|
--
|
||
|
2.3.4
|
||
|
|