File Coverage

lib/Zimbra/Expect/ZmMailbox.pm
Criterion Covered Total %
statement 9 12 75.0
branch n/a
condition n/a
subroutine 3 4 75.0
pod 1 1 100.0
total 13 17 76.4


line stmt bran cond sub pod time code
1             package Zimbra::Expect::ZmMailbox;
2 1     1   813 use strict;
  1         1  
  1         21  
3 1     1   3 use warnings;
  1         2  
  1         17  
4 1     1   3 use base 'Zimbra::Expect';
  1         2  
  1         114  
5              
6             sub new {
7 0     0 1   my $class = shift;
8 0           my $opt = { @_ };
9 0           return $class->SUPER::new(cmd=>['zmmailbox','-z','-m', $opt->{account}],prompt=>'mbox',verbose=>$opt->{verbose},noaction=>$opt->{noaction});
10             }
11              
12             1;
13              
14             __END__