blib/lib/Shipwright/Script/Rename.pm | |||
---|---|---|---|
Criterion | Covered | Total | % |
branch | 0 | 18 | 0.0 |
line | true | false | branch |
---|---|---|---|
16 | 0 | 0 | unless $name |
17 | 0 | 0 | unless $new_name |
19 | 0 | 0 | unless $new_name =~ /^[-\w]+$/ |
26 | 0 | 0 | unless grep {$_ eq $name;} @$order |
38 | 0 | 0 | $_ eq $name ? : |
44 | 0 | 0 | if $$map{$_} eq $name |
55 | 0 | 0 | unless $hashref |
57 | 0 | 0 | if ($_ eq $name) |
68 | 0 | 0 | if $branches |