| blib/lib/Devel/REPL/Script.pm | |||
|---|---|---|---|
| Criterion | Covered | Total | % |
| branch | 0 | 24 | 0.0 |
| line | true | false | branch |
|---|---|---|---|
| 40 | 0 | 0 | unless $profile =~ /::/ |
| 42 | 0 | 0 | unless $profile->does('Devel::REPL::Profile') |
| 51 | 0 | 0 | unless ($rc_file =~ m[/]) |
| 61 | 0 | 0 | if (not -e $script) { } |
| 0 | 0 | elsif (not -r _) { } | |
| 62 | 0 | 0 | if $warn_on_unreadable |
| 66 | 0 | 0 | if $warn_on_unreadable |
| 70 | 0 | 0 | unless open RCFILE, '<', $script |
| 75 | 0 | 0 | if $@ |
| 91 | 0 | 0 | unless @opts == 1 and $opts[0] eq 'run' |
| 96 | 0 | 0 | if ref $_[0] |
| 97 | 0 | 0 | unless $CURRENT_SCRIPT |