blib/lib/Mail/Bulkmail/Object.pm | |||
---|---|---|---|
Criterion | Covered | Total | % |
condition | 10 | 50 | 20.0 |
line | !l | l&&!r | l&&r | condition |
---|---|---|---|---|
462 | 0 | 0 | 0 | @_ and $pkg ne $internalpkg |
0 | 0 | 0 | @_ and $pkg ne $internalpkg | |
608 | 0 | 32 | 0 | not $nolog and $self->ERRFILE |
32 | 0 | 0 | not $nolog and $self->ERRFILE and $error | |
787 | 0 | 0 | 0 | defined $user and $user != $> |
791 | 0 | 0 | 0 | defined $val and $val =~ /^\\/ |
line | l | !l | condition |
---|---|---|---|
349 | 2 | 0 | $pkg->read_conf_file || die('Conf file error : ' . $pkg->error . ' ' . $pkg->errcode) |
467 | 0 | 0 | $pkg->read_conf_file || die('Conf file error : ' . $pkg->error . ' ' . $pkg->errcode) |
605 | 0 | 32 | shift() || 0 |
794 | 0 | 0 | $$conf{$pkg}{$key} ||= [] |
943 | 3 | 0 | $self->read_conf_file || die('Conf file error : ' . $self->error . ' ' . $self->errcode) |
954 | 0 | 0 | $self->errcode || 'MBO003' |
983 | 0 | 0 | $self->errcode || 'MBO004' |
1010 | 3 | 3 | shift() || {} |
1118 | 4 | 0 | shift() || $self->LIST || (return $self->error('Cannot get next line w/o list', 'MB045')) |
1182 | 3 | 0 | shift() || (return $self->error('Cannot log to file w/o file', 'MB047')) |
line | l | !l&&r | !l&&!r | condition |
---|---|---|---|---|
760 | 0 | 0 | 0 | not $$loaded{$conf_file} or -M $conf_file <= 0 |
765 | 0 | 0 | 0 | not defined $line or $line =~ /^\s*#/ |
0 | 0 | 0 | not defined $line or $line =~ /^\s*#/ or $line =~ /^\s*$/ | |
892 | 3 | 0 | 0 | $self->init(@_) || $class->error($self->error, $self->errcode, 'not logged') |