| line |
true |
false |
branch |
|
153
|
1 |
116 |
unless (exists $_shortcut_file_readers{lc $suffix}) |
|
187
|
434 |
2 |
if ($line =~ /^\s*([A-Za-z0-9-]*)(\[([^\[\]]*)\])?\s*=\s*([^\n\r]*?)\s*$/) { } |
|
219
|
2 |
84 |
unless (-e $filename) |
|
246
|
0 |
31 |
unless open my $file, '<:encoding(UTF-8)', $filename |
|
265
|
0 |
53 |
unless open my $file, '<', $filename |
|
289
|
1 |
29 |
unless open my $file, '<', $filename |
|
333
|
1 |
36 |
if (not $next_line) { } |
|
|
29 |
7 |
elsif (_is_group_header($next_line, '(KDE )?Desktop Entry')) { } |
|
|
6 |
1 |
elsif (_desktop_entry_is_blank_or_comment_line($next_line)) { } |
|
348
|
2 |
29 |
unless ($desktop_entry_found) |
|
356
|
28 |
149 |
if (not $next_line) { } |
|
|
1 |
148 |
elsif (_is_group_header($next_line, '.*')) { } |
|
|
9 |
139 |
elsif (_desktop_entry_is_blank_or_comment_line($next_line)) { } |
|
364
|
138 |
1 |
if (defined $key) { } |
|
365
|
28 |
110 |
if ($key eq 'Type') { } |
|
|
27 |
83 |
elsif ($key eq 'URL') { } |
|
377
|
1 |
28 |
if (not defined $type) { } |
|
|
1 |
27 |
elsif ($type ne 'Link') { } |
|
383
|
2 |
27 |
unless (defined $url) |
|
412
|
53 |
456 |
if (not $next_line) { } |
|
|
53 |
403 |
elsif (_is_group_header($next_line, 'InternetShortcut')) { } |
|
|
6 |
397 |
elsif (_is_group_header($next_line, 'InternetShortcut.W')) { } |
|
|
97 |
300 |
elsif (_is_group_header($next_line, '.*')) { } |
|
|
3 |
297 |
elsif (_url_is_blank_or_comment_line($next_line)) { } |
|
425
|
296 |
1 |
if (defined $key) { } |
|
426
|
64 |
232 |
if ($key eq 'URL') |
|
427
|
52 |
12 |
if ($curr_section == 1) { } |
|
|
6 |
6 |
elsif ($curr_section == 2) { } |
|
440
|
6 |
47 |
if (defined $parsed_urlw) { } |
|
|
46 |
1 |
elsif (defined $parsed_url) { } |
|
461
|
0 |
29 |
unless eval "use $module $list; 1" |
|
475
|
1 |
28 |
if (ref $data ne 'Mac::PropertyList::dict') { } |
|
|
1 |
27 |
elsif (not exists $$data{'URL'}) { } |
|
502
|
0 |
4 |
unless (exists $_shortcut_handle_readers{lc $suffix}) |