| blib/lib/File/Temp/MoreUtils.pm | |||
|---|---|---|---|
| Criterion | Covered | Total | % |
| branch | 17 | 20 | 85.0 |
| line | true | false | branch |
|---|---|---|---|
| 93 | 1 | 12 | unless defined $args{'name'} |
| 97 | 4 | 8 | if (exists $args{'dir'}) |
| 98 | 2 | 2 | if (defined $args{'dir'}) { } |
| 104 | 0 | 4 | unless -d $dir |
| 110 | 4 | 8 | defined $dir ? : |
| 114 | 14 | 12 | if (defined $suffix) { } |
| 115 | 11 | 3 | unless $name =~ s/(.+\.)(?=.)/"$1$suffix.";/e |
| 121 | 12 | 14 | if (sysopen $fh, $name, 192) |
| 124 | 0 | 14 | unless ($! =~ /File exists/) |
| 127 | 0 | 14 | if ($counter++ > 10000) |