line |
true |
false |
branch |
42
|
0 |
0 |
unless $self->brik_help_run_undef_arg("connect", $host) |
43
|
0 |
0 |
unless $self->brik_help_run_undef_arg("connect", $port) |
44
|
0 |
0 |
unless $self->brik_help_run_undef_arg("connect", $username) |
45
|
0 |
0 |
unless $self->brik_help_run_undef_arg("connect", $password) |
50
|
0 |
0 |
unless my $sr = "Metabrik::String::Regex"->new_from_brik_init($self) |
52
|
0 |
0 |
unless my $re = $sr->encode($prompt) |
63
|
0 |
0 |
if ($@) |
71
|
0 |
0 |
if ($@) |
87
|
0 |
0 |
unless $self->brik_help_run_undef_arg("connect", $client) |
93
|
0 |
0 |
if ($@) |