| line | % | coverage | branch |
|---|
| 54 | 50 | T | F | unless open my $IN, '<', $template |
| 58 | 50 | T | F | unless (-d $configdir) |
| 59 | 0 | T | F | unless mkdir $configdir |
| 64 | 50 | T | F | unless open my $OUT, '>', $gen_pm |
| 83 | 100 | T | F | unless ($embeds_seen{$em}) |
| 93 | 50 | T | F | if $conf->data->get('osname') eq 'msys' |
| 103 | 50 | T | F | if ($cwd =~ /[^[:ascii:]]/) |
| 121 | 50 | T | F | unless close $IN |
| 122 | 50 | T | F | unless close $OUT |
| 125 | 50 | T | F | unless open $IN, '<', $template |
| 128 | 50 | T | F | unless open $OUT, '>', $c_l_pir |
| 147 | 100 | T | F | if (/\@PCONFIG\@/) { } |
| 100 | T | F | elsif (s/\"\@PWD\@\"/$cwdcharset"$cwd"/) { } |
| 152 | 100 | T | F | unless lc $a cmp lc $b |
| 153 | 100 | T | F | if exists $p5_keys{$k} |
| 154 | 100 | T | F | if $k =~ /_provisional$/ |
| 157 | 100 | T | F | if (defined $v) { } |
| 159 | 50 | T | F | if ($type) |
| 169 | 50 | T | F | if ($v =~ /[^[:ascii:]]/) |
| 188 | 50 | T | F | unless close $IN |
| 189 | 50 | T | F | unless close $OUT |