lib/Mac/Alias.pm | |||
---|---|---|---|
Criterion | Covered | Total | % |
condition | 16 | 47 | 34.0 |
line | !l | l&&!r | l&&r | condition |
---|---|---|---|---|
75 | 1 | 1 | 3 | $success and $MAGIC eq substr($header, 0, 16) |
144 | 4 | 0 | 3 | $item_type and $item_type == 53264 |
306 | 11 | 0 | 0 | -x "/usr/bin/osacompile" and -x "/usr/bin/osascript" |
335 | 0 | 0 | 0 | $out and not $out =~ /\(-1700\)/u |
346 | 2 | 2 | 1 | $target and $target->exists |
355 | 0 | 0 | 0 | $out and not $? |
line | l | !l | condition |
---|---|---|---|
82 | 0 | 0 | "$!" || 'Unexpected EOF in alias header' |
84 | 0 | 0 | "$!" || 'Unexpected EOF in alias data' |
106 | 0 | 0 | "$!" || 'Unexpected EOF in alias chunk' |
109 | 0 | 0 | "$!" || 'Unexpected EOF in alias file' |
line | l | !l&&r | !l&&!r | condition |
---|---|---|---|---|
89 | 71 | 4 | 3 | my $item = pop @toc or $next |
114 | 55 | 0 | 0 | $key //= sprintf("%#x", $item_type) |
307 | 0 | 0 | 0 | $_osascript{'_dir'} //= "Path::Tiny"->tempdir("Mac-Alias-XXXXXXXX") |
325 | 0 | 0 | 5 | $_osascript{'resolve_alias'} // &_osascript("resolve_alias") |
334 | 0 | 0 | 0 | not $out or $? |
348 | 0 | 0 | 4 | $_osascript{'resolve_alias'} // &_osascript("resolve_alias") |
368 | 0 | 0 | 2 | $_osascript{'create_alias'} // &_osascript("create_alias") |