| line |
true |
false |
branch |
|
23
|
0 |
1 |
unless get_args_as_hash(\@_, \my(%args), {'timeout', 180}) |
|
43
|
0 |
1 |
unless get_args_as_hash(\@_, \my(%args), {'image', $image}) |
|
48
|
0 |
1 |
unless -e $args{'image'} |
|
53
|
0 |
1 |
unless $mech->get('http://www.html-kit.com/favicon/')->is_success |
|
56
|
0 |
1 |
unless $mech->form_number(1) |
|
63
|
0 |
1 |
unless $mech->click->is_success |
|
69
|
0 |
1 |
unless my $response = $mech->follow_link('url_regex', qr"^http\:\/\/favicon\.htmlkit\.com\/favicon\/download\/") |
|
75
|
0 |
1 |
unless $response->is_success |
|
78
|
0 |
1 |
if ($args{'file'}) |
|
79
|
0 |
0 |
unless open my $fh, '>', $args{'file'} |
|
92
|
0 |
0 |
if ($type) { } |