| line |
true |
false |
branch |
|
23
|
0 |
1 |
unless get_args_as_hash(\@_, \my(%args), {'timeout', 180}) |
|
44
|
0 |
1 |
unless get_args_as_hash(\@_, \my(%args), {'image', $image}) |
|
49
|
0 |
1 |
unless -e $args{'image'} |
|
54
|
0 |
1 |
unless $mech->get('http://www.html-kit.com/favicon/')->is_success |
|
57
|
0 |
1 |
unless $mech->form_number(1) |
|
64
|
0 |
1 |
unless $mech->click->is_success |
|
70
|
0 |
1 |
unless my $response = $mech->follow_link('url_regex', qr"^http\:\/\/favicon\.htmlkit\.com\/favicon\/download\/") |
|
76
|
0 |
1 |
unless $response->is_success |
|
79
|
0 |
1 |
if ($args{'file'}) |
|
80
|
0 |
0 |
unless open my $fh, '>', $args{'file'} |
|
93
|
0 |
0 |
if ($type) { } |