| line |
true |
false |
branch |
|
43
|
0 |
127 |
if @_ == 1 and $self->_is_a($_[0], "Module::Generic::Null")
|
|
44
|
125 |
2 |
if (@_)
|
|
47
|
0 |
125 |
unless (defined $str and length "$str")
|
|
56
|
0 |
127 |
unless $self->SUPER::init(@_)
|
|
66
|
6 |
2 |
if (@_)
|
|
69
|
6 |
0 |
if (defined $b and length $b)
|
|
72
|
2 |
3 |
if length $b > 70 or $b =~ m[[^0-9a-zA-Z'()+_,\-./:=? ]] or $b =~ / $/
|
|
84
|
6 |
4 |
if (@_)
|
|
87
|
6 |
0 |
if (defined $cs and length $cs)
|
|
89
|
1 |
5 |
unless ($cs =~ /$Mail::Make::Headers::ContentType::VALID_CHARSETS/)
|
|
96
|
1 |
4 |
if $cs eq "utf8"
|
|
107
|
0 |
1 |
unless $self->_load_class("Data::UUID")
|
|
116
|
3 |
5 |
if (@_) { }
|
|
120
|
1 |
1 |
unless ($mime =~ m[^[A-Za-z0-9][A-Za-z0-9!\#\$&\-^_]*
|