Branch Coverage

blib/lib/Metabrik/Database/Keystore.pm
Criterion Covered Total %
branch 0 44 0.0


line true false branch
42 0 0 unless $self->brik_help_run_undef_arg("search", $pattern)
43 0 0 unless $self->brik_help_run_undef_arg("search", $db)
50 0 0 if /$pattern/i
61 0 0 unless $self->brik_help_run_undef_arg("decrypt", $db)
62 0 0 unless $self->brik_help_run_file_not_found("decrypt", $db)
64 0 0 unless my $read = $self->read($db)
66 0 0 unless my $ca = "Metabrik::Crypto::Aes"->new_from_brik_init($self)
68 0 0 unless my $decrypted = $ca->decrypt($read)
77 0 0 unless $self->brik_help_run_undef_arg("encrypt", $data)
79 0 0 unless my $ca = "Metabrik::Crypto::Aes"->new_from_brik_init($self)
81 0 0 unless my $encrypted = $ca->encrypt($data)
91 0 0 unless $self->brik_help_run_undef_arg("save", $data)
92 0 0 unless $self->brik_help_run_undef_arg("save", $db)
94 0 0 unless $self->write($data, $db)
104 0 0 unless $self->brik_help_run_undef_arg("load", $db)
118 0 0 unless $self->brik_help_run_undef_arg("add", $db)
120 0 0 unless my $sp = "Metabrik::String::Password"->new_from_brik_init($self)
121 0 0 unless my $fw = "Metabrik::File::Write"->new_from_brik_init($self)
125 0 0 unless my $lines = $self->load($db)
138 0 0 unless my $encrypted = $self->encrypt($content)
140 0 0 unless $fw->open($db)
141 0 0 unless $fw->write($encrypted)