| blib/lib/Metabrik/Shell/Script.pm | |||
|---|---|---|---|
| Criterion | Covered | Total | % |
| branch | 0 | 16 | 0.0 |
| line | true | false | branch |
|---|---|---|---|
| 32 | 0 | 0 | unless $self->brik_help_run_file_not_found('load', $input) |
| 35 | 0 | 0 | unless open my $in, '<', $input |
| 39 | 0 | 0 | if $line =~ /^\s*$/ |
| 40 | 0 | 0 | if $line =~ /^\s*#/ |
| 54 | 0 | 0 | unless (defined $self->shell) |
| 58 | 0 | 0 | unless $self->brik_help_run_undef_arg('execute', $lines) |
| 59 | 0 | 0 | unless $self->brik_help_run_invalid_arg('execute', $lines, 'ARRAY') |
| 74 | 0 | 0 | unless my $lines = $self->load($input) |