| blib/script/rename | |||
|---|---|---|---|
| Criterion | Covered | Total | % |
| branch | 9 | 16 | 56.2 |
| line | true | false | branch |
|---|---|---|---|
| 11 | 0 | 10 | unless my $options = File::Rename::Options::GetOptions() |
| 14 | 0 | 10 | if File::Rename::Options::bad_encoding($options) |
| 22 | 1 | 9 | if $options->{'show_version'} |
| 23 | 0 | 9 | if $options->{'show_manual'} |
| 24 | 0 | 9 | if $options->{'show_help'} |
| 26 | 0 | 9 | if $^O =~ /Win/msx |
| 36 | 1 | 0 | if (eval $opt_ver < eval $version) |
| 37 | 1 | 0 | unless $opt_ver =~ /\./ |