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_/) |