| blib/lib/Getopt/EX/Long.pm | |||
|---|---|---|---|
| Criterion | Covered | Total | % |
| branch | 11 | 20 | 55.0 |
| line | true | false | branch |
|---|---|---|---|
| 45 | 2 | 0 | if $ConfigOption{'AUTO_DEFAULT'} |
| 49 | 3 | 9 | exists $ConfigOption{$_} ? : |
| 56 | 1 | 1 | if (ref $_[1] eq 'HASH') { } |
| 74 | 0 | 0 | if (exists $opt{$name}) |
| 78 | 0 | 0 | if %opt |
| 89 | 3 | 0 | $0 =~ m[([^/]+)$]u ? : |
| 91 | 3 | 0 | if (defined(my $home = $ENV{'HOME'})) |
| 92 | 1 | 2 | if (-f (my $rc = "$home/.${prog}rc")) |
| 125 | 1 | 0 | if (@exconfig == 0 and $ConfigOption{'AUTO_DEFAULT'}) |
| 144 | 1 | 0 | if (ref $_[1] eq 'HASH') { } |