| blib/lib/Matts/Message/Parser.pm | |||
|---|---|---|---|
| Criterion | Covered | Total | % |
| condition | 0 | 96 | 0.0 |
| line | !l | l&&!r | l&&r | condition |
|---|---|---|---|---|
| 128 | 0 | 0 | 0 | ref $_[0] and UNIVERSAL::isa($_[0], 'IO::Handle') |
| 246 | 0 | 0 | 0 | $ct and $ct =~ /charset="?([^\";]+)"?;?/i |
| 640 | 0 | 0 | 0 | $type and $type =~ /^text\b/i |
| 1025 | 0 | 0 | 0 | $is_att and not @atts |
| 0 | 0 | 0 | $is_att and not @atts and $att_name ne 'AttachRenddata' | |
| 1066 | 0 | 0 | 0 | $is_msg and $is_att |
| 1084 | 0 | 0 | 0 | substr($att_id, 2) eq $Matts::Message::TNEF::atp{'Date'} and $length == 14 |
| 0 | 0 | 0 | $att_id eq $Matts::Message::TNEF::att{'AttachRenddata'} and $length == 14 | |
| 1192 | 0 | 0 | 0 | $$self{$attr} && $$self{$attr}->as_string |
| 1198 | 0 | 0 | 0 | $$self{$attr} && $$self{$attr}->data |
| line | l | !l | condition |
|---|---|---|---|
| 251 | 0 | 0 | $binenc ||= 'ASCII' |
| 275 | 0 | 0 | $_msg->header('Content-Type') || 'text/plain' |
| 929 | 0 | 0 | $$parms{'display_after_err'} || 32 |
| 1191 | 0 | 0 | shift() || 'AttachData' |
| 1197 | 0 | 0 | shift() || 'AttachTitle' |
| 1220 | 0 | 0 | shift() || 'AttachData' |
| 1228 | 0 | 0 | shift() || 'AttachData' |
| 1244 | 0 | 0 | $self->open('r') || (return ()) |
| 1254 | 0 | 0 | $self->open('r') || (return undef) |
| 1285 | 0 | 0 | $self->open('r') || (return undef) |
| 1304 | 0 | 0 | 'FileHandle'->new(">$path") || die("write-open ${path}: $!") |
| 1307 | 0 | 0 | 'FileHandle'->new("<$path") || die("read-open ${path}: $!") |
| line | l | !l&&r | !l&&!r | condition |
|---|---|---|---|---|
| 348 | 0 | 0 | 0 | /^\-\-\Q$boundary\E/ or eof $body |
| 424 | 0 | 0 | 0 | /^\-\-\Q$boundary\E/ or eof $body |
| 536 | 0 | 0 | 0 | $header =~ /=\?/ or $header =~ /[\x80-\xff]/ |
| 658 | 0 | 0 | 0 | $converter ||= $class->converter('ascii') |
| 681 | 0 | 0 | 0 | tempfile() || croak("new_tmpfile failed : $!") |
| 688 | 0 | 0 | 0 | tempdir('CLEANUP', 1) || croak("new_tmpdir failed: $!") |
| 698 | 0 | 0 | 0 | eval { do { 'EncodeConverter'->new($charset) } } || 'NullConverter'->new |
| 952 | 0 | 0 | 0 | @_ == 2 or @_ == 3 |
| 955 | 0 | 0 | 0 | ref $self || $self |
| 988 | 0 | 0 | 0 | $is_msg or $is_att |
| 1055 | 0 | 0 | 0 | $calc_chksum eq $file_chksum or $ignore_checksum |
| 1069 | 0 | 0 | 0 | $is_msg or $is_att |
| 1183 | 0 | 0 | 0 | ref $proto || $proto |
| 1215 | 0 | 0 | 0 | $longname || $self->name |