| line |
true |
false |
branch |
|
153
|
1 |
114 |
unless (exists $_shortcut_file_readers{lc $suffix}) |
|
187
|
437 |
2 |
if ($line =~ /^\s*([A-Za-z0-9-]*)(\[([^\[\]]*)\])?\s*=\s*([^\n\r]*?)\s*$/) { } |
|
219
|
2 |
82 |
unless (-e $filename) |
|
246
|
0 |
30 |
unless open my $file, '<:encoding(UTF-8)', $filename |
|
265
|
0 |
52 |
unless open my $file, '<', $filename |
|
289
|
1 |
29 |
unless open my $file, '<', $filename |
|
333
|
1 |
35 |
if (not $next_line) { } |
|
|
28 |
7 |
elsif (_is_group_header($next_line, '(KDE )?Desktop Entry')) { } |
|
|
6 |
1 |
elsif (_desktop_entry_is_blank_or_comment_line($next_line)) { } |
|
348
|
2 |
28 |
unless ($desktop_entry_found) |
|
356
|
27 |
153 |
if (not $next_line) { } |
|
|
1 |
152 |
elsif (_is_group_header($next_line, '.*')) { } |
|
|
9 |
143 |
elsif (_desktop_entry_is_blank_or_comment_line($next_line)) { } |
|
364
|
142 |
1 |
if (defined $key) { } |
|
365
|
27 |
115 |
if ($key eq 'Type') { } |
|
|
26 |
89 |
elsif ($key eq 'URL') { } |
|
377
|
1 |
27 |
if (not defined $type) { } |
|
|
1 |
26 |
elsif ($type ne 'Link') { } |
|
383
|
2 |
26 |
unless (defined $url) |
|
412
|
52 |
454 |
if (not $next_line) { } |
|
|
52 |
402 |
elsif (_is_group_header($next_line, 'InternetShortcut')) { } |
|
|
6 |
396 |
elsif (_is_group_header($next_line, 'InternetShortcut.W')) { } |
|
|
97 |
299 |
elsif (_is_group_header($next_line, '.*')) { } |
|
|
3 |
296 |
elsif (_url_is_blank_or_comment_line($next_line)) { } |
|
425
|
295 |
1 |
if (defined $key) { } |
|
426
|
63 |
232 |
if ($key eq 'URL') |
|
427
|
51 |
12 |
if ($curr_section == 1) { } |
|
|
6 |
6 |
elsif ($curr_section == 2) { } |
|
440
|
6 |
46 |
if (defined $parsed_urlw) { } |
|
|
45 |
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}) |