line |
true |
false |
branch |
51
|
0 |
0 |
unless my $cw = "Metabrik::Client::Www"->new_from_brik_init($self) |
52
|
0 |
0 |
unless my $files = $cw->mirror($url, $file, $datadir) |
53
|
0 |
0 |
if (@$files == 0) |
58
|
0 |
0 |
unless my $ft = "Metabrik::File::Text"->new_from_brik_init($self) |
61
|
0 |
0 |
unless my $text = $ft->read($output) |
81
|
0 |
0 |
unless $self->brik_help_run_file_not_found("load", $input) |
83
|
0 |
0 |
unless my $data = $self->read($input) |
92
|
0 |
0 |
unless $self->brik_help_run_undef_arg("from_dec", $dec) |
95
|
0 |
0 |
unless (defined $data) |
100
|
0 |
0 |
if ($this->{'Decimal'} == $dec) |
113
|
0 |
0 |
unless $self->brik_help_run_undef_arg("from_hex", $hex) |
124
|
0 |
0 |
unless $self->brik_help_run_undef_arg("from_string", $string) |
127
|
0 |
0 |
unless (defined $data) |
133
|
0 |
0 |
if ($this->{'Keyword'} =~ /$string/i) { } |
|
0 |
0 |
elsif ($this->{'Protocol'} =~ /$string/i) { } |