| line |
true |
false |
branch |
|
31
|
50 |
0 |
if ($error_str) |
|
39
|
1 |
1 |
(shift())->{'error'} ? : |
|
46
|
0 |
88 |
unless ($proxyStr) |
|
55
|
0 |
88 |
unless ($proxyUrl->protocol and $proxyUrl->host) |
|
61
|
36 |
52 |
unless (exists $PROXY_PROTOCOLS{$proxyUrl->protocol}) |
|
67
|
12 |
40 |
if ($proxyUrl->port and $proxyUrl->port > 65535) |
|
82
|
2 |
3 |
unless (defined $id and $id =~ /^\w{1,14}$/) |
|
100
|
0 |
1 |
unless (defined $filename) |
|
106
|
0 |
1 |
unless (-f $filename) |
|
112
|
0 |
1 |
unless (-r $filename) |
|
118
|
1 |
0 |
unless defined $self->{'ua'} |
|
121
|
0 |
1 |
if $self->{'proxy'} |
|
134
|
1 |
0 |
if (my($id) = $res->content =~ m[https://gyazo.com/(\w+)]is) { } |