diff --git a/lib/Resmon/Config.pm b/lib/Resmon/Config.pm
index 0731d92744cc38e39ff349dacae398eadf97f5c7..b8fdb9dd2fdbf5221519e6969fdd99f61c59435d 100755
--- a/lib/Resmon/Config.pm
+++ b/lib/Resmon/Config.pm
@@ -13,11 +13,12 @@ sub split_ip_list {
     my (@result,$quad,$bits,$matchbits,$int,$mask);
     for (split (/\s*[,\s]\s*/, $string)) {
        ($quad, $bits) = m!^(\d+\.\d+\.\d+\.\d+)(?:/(\d+))?!g;
-       $bits = 32 if ($bits eq '');
+       $bits = 32 unless (defined($bits) && $bits ne '');
        $matchbits = 32 - $bits;
        $int = unpack("N", pack("C4", split(/\./,$quad)));
        $mask = $int >> $matchbits;
        push @result => {mask => $mask, bits => $matchbits, allow => $allow};
+print STDERR "mask=$mask,bits=$matchbits,allow=$allow\n";
     }
     return \@result;
 }