| blib/lib/Devel/Platform/Info/Mac.pm | |||
|---|---|---|---|
| Criterion | Covered | Total | % |
| branch | 10 | 14 | 71.4 |
| line | true | false | branch |
|---|---|---|---|
| 27 | 4 | 2 | if ($uname_s =~ /Darwin/i) |
| 31 | 4 | 0 | if ($productversion =~ /((\d+)\.(\d+)(\.(\d+))?)/) |
| 34 | 4 | 0 | if (my $codename = $$versions{"$major.$minor"}) |
| 41 | 5 | 1 | if (my $arch = $self->_command('uname -p')) |
| 44 | 5 | 0 | !($arch =~ /_(64)$/) ? : |
| 45 | 0 | 5 | $arch =~ /_(64)$/ ? : |
| 48 | 5 | 1 | if (my $unamev = $self->_command('uname -v')) |