| 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") |