| blib/lib/Convert/yEnc/RC.pm | |||
|---|---|---|---|
| Criterion | Covered | Total | % |
| branch | 24 | 32 | 75.0 |
| line | true | false | branch |
|---|---|---|---|
| 16 | 8 | 6 | if $file |
| 30 | 6 | 5 | unless open RC, $file |
| 34 | 2 | 5 | unless $line =~ /\S/ |
| 60 | 19 | 26 | if $name |
| 63 | 45 | 0 | if $rc->can($tag) |
| 71 | 0 | 19 | unless $name |
| 75 | 6 | 13 | if ($entry) |
| 89 | 9 | 0 | if $entry |
| 99 | 16 | 1 | if $entry |
| 114 | 9 | 4 | $name ? : |
| 121 | 9 | 0 | if $entry |
| 150 | 1 | 9 | unless my $file = shift() || $$rc{'file'} |
| 153 | 0 | 9 | unless open RC, "> $file.tmp" |
| 166 | 0 | 9 | unless rename "$file.tmp", $file |
| 183 | 0 | 2 | unless @a == @b |
| 187 | 0 | 4 | unless $$a{'db'}{$name} eq $$b{'db'}{$name} |