Branch Coverage
blib/lib/WWW/Fido.pm
Criterion
Covered
Total
%
branch
3
6
50.0
line
true
false
branch
160
0
1
if ($phone and not $self->setphone($phone)) { }
0
1
elsif ($name and not $self->setname($name)) { }
178
0
2
if (not $phone =~ /^([0-9]{3})([0-9]{7})$/) { }