Condition Coverage

blib/lib/Net/Random.pm
Criterion Covered Total %
condition 19 21 90.4


or 3 conditions

line l !l&&r !l&&!r condition
185 0 1 43 grep {not $_ =~ /^(src|min|max|ssl)$/;} keys %params or not exists $params{'src'}
1 1 42 grep {not $_ =~ /^(src|min|max|ssl)$/;} keys %params or not exists $params{'src'} or not $params{'src'} =~ /^(fourmilab\.ch|random\.org|qrng\.anu\.edu\.au)$/
2 1 41 grep {not $_ =~ /^(src|min|max|ssl)$/;} keys %params or not exists $params{'src'} or not $params{'src'} =~ /^(fourmilab\.ch|random\.org|qrng\.anu\.edu\.au)$/ or not $params{'min'} =~ /^-?\d+$/
2 1 40 grep {not $_ =~ /^(src|min|max|ssl)$/;} keys %params or not exists $params{'src'} or not $params{'src'} =~ /^(fourmilab\.ch|random\.org|qrng\.anu\.edu\.au)$/ or not $params{'min'} =~ /^-?\d+$/ or not $params{'max'} =~ /^-?\d+$/
2 2 38 grep {not $_ =~ /^(src|min|max|ssl)$/;} keys %params or not exists $params{'src'} or not $params{'src'} =~ /^(fourmilab\.ch|random\.org|qrng\.anu\.edu\.au)$/ or not $params{'min'} =~ /^-?\d+$/ or not $params{'max'} =~ /^-?\d+$/ or $params{'max'} > 4294967295
3 1 37 grep {not $_ =~ /^(src|min|max|ssl)$/;} keys %params or not exists $params{'src'} or not $params{'src'} =~ /^(fourmilab\.ch|random\.org|qrng\.anu\.edu\.au)$/ or not $params{'min'} =~ /^-?\d+$/ or not $params{'max'} =~ /^-?\d+$/ or $params{'max'} > 4294967295 or $params{'min'} >= $params{'max'}
3 0 37 grep {not $_ =~ /^(src|min|max|ssl)$/;} keys %params or not exists $params{'src'} or not $params{'src'} =~ /^(fourmilab\.ch|random\.org|qrng\.anu\.edu\.au)$/ or not $params{'min'} =~ /^-?\d+$/ or not $params{'max'} =~ /^-?\d+$/ or $params{'max'} > 4294967295 or $params{'min'} >= $params{'max'} or $params{'max'} - $params{'min'} > 4294967295