Branch Coverage

blib/lib/WebService/Antigate/V1.pm
Criterion Covered Total %
branch 17 30 56.6


line true false branch
31 0 1 if not defined $opts{'file'} || defined $opts{'content'} or defined $opts{'file'} and not -e $opts{'file'}
64 0 1 !($file =~ /\..{1,5}$/) ? :
0 1 defined $opts{'name'} ? :
0 0 defined $opts{'name'} ? :
1 0 defined $opts{'file'} ? :
69 0 1 unless ($response->is_success)
76 0 1 unless (($captcha_id) = $response->content =~ /OK\|(\d+)/)
88 0 2 unless defined $id
92 0 2 unless ($response->is_success)
99 1 1 unless (($captcha_text) = $response->content =~ /OK\|(.+)/)
111 0 2 unless defined $id
115 0 2 unless ($response->is_success)
121 1 1 unless ($response->content eq 'OK_REPORT_RECORDED')
136 0 2 unless ($response->is_success)
142 1 1 if ($response->content =~ /^ERROR_/)