From f153810d08f86e804f7e43febb812ddabe810e92 Mon Sep 17 00:00:00 2001 From: Christoph Klaffl Date: Wed, 21 Nov 2018 23:14:30 +0100 Subject: [PATCH] check for valid estimated send size to prevent a perl warning on systems which doesn't output size informations --- syncoid | 5 +++++ 1 file changed, 5 insertions(+) diff --git a/syncoid b/syncoid index 30aef49..1f759e2 100755 --- a/syncoid +++ b/syncoid @@ -1154,6 +1154,11 @@ sub getsendsize { } chomp $sendsize; + # check for valid value + if ($sendsize !~ /^\d+$/) { + $sendsize = ''; + } + # to avoid confusion with a zero size pv, give sendsize # a minimum 4K value - or if empty, make sure it reads UNKNOWN if ($debug) { print "DEBUG: sendsize = $sendsize\n"; }