blib/lib/Acme/Goedelize.pm | |||
---|---|---|---|
Criterion | Covered | Total | % |
branch | 9 | 12 | 75.0 |
line | true | false | branch |
---|---|---|---|
59 | 0 | 1 | unless $text =~ /^[a-zA-Z\s]*$/ |
63 | 1 | 0 | unless ($text =~ /\.$/) |
86 | 0 | 1 | unless $number =~ /^[0-9]*$/ |
101 | 4 | 33 | if $tmp % $prime > 0 |
106 | 1 | 3 | if $link{$times} eq '.' |
119 | 4 | 18 | unless $guess % $divisor |