| line |
true |
false |
branch |
|
52
|
0 |
0 |
unless my $cw = "Metabrik::Client::Www"->new_from_brik_init($self) |
|
53
|
0 |
0 |
unless $cw->mirror($url, $output, $datadir) |
|
63
|
0 |
0 |
unless $self->brik_help_run_file_not_found("load", $input) |
|
67
|
0 |
0 |
unless my $data = $self->read($input) |
|
76
|
0 |
0 |
unless $self->brik_help_run_undef_arg("from_hex", $hex) |
|
79
|
0 |
0 |
unless (defined $data) |
|
86
|
0 |
0 |
if (ref $hex eq 'ARRAY') { } |
|
|
0 |
0 |
elsif (not ref $hex) { } |
|
103
|
0 |
0 |
if (exists $db->{$1}) |
|
115
|
0 |
0 |
unless $self->brik_help_run_undef_arg("from_string", $string) |
|
118
|
0 |
0 |
unless (defined $data) |
|
125
|
0 |
0 |
if ($this =~ /^\s*([0-9A-F]{2}\-[0-9A-F]{2}\-[0-9A-F]{2})\s+\(hex\)\s+(.*)$/i) |
|
129
|
0 |
0 |
if ($company =~ /$string/i) |
|
144
|
0 |
0 |
unless (defined $data) |
|
151
|
0 |
0 |
if ($this =~ /^\s*([0-9A-F]{6})\s+\(base 16\)\s+(.*)$/i) |