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) { } |