Branch Coverage

blib/lib/LWP/Protocol/mailto.pm
Criterion Covered Total %
branch 4 54 7.4


line true false branch
37 0 1 if $^O eq 'MacOS'
38 0 1 if $^O eq 'MacOS'
41 0 1 if (defined $proxy)
50 1 0 if ($method ne 'POST')
60 0 0 if ($scheme ne 'mailto')
64 0 0 if ($^O eq 'MacOS') { }
68 0 0 if ($@)
72 0 0 unless ($ENV{'SMTPHOSTS'})
78 0 0 unless (-x $SENDMAIL)
83 0 0 if ($^O eq 'MacOS') { }
84 0 0 unless $mail = 'Mail::Internet'->new
89 0 0 unless open SENDMAIL, "| $SENDMAIL -oi -t"
93 0 0 if ($^O eq 'MacOS') { }
102 0 0 unless defined $v
103 0 0 if (lc $k eq 'body') { }
111 0 0 if ($^O eq 'MacOS') { }
120 0 0 if (defined $content)
121 0 0 ref $content ? :
122 0 0 if (ref $contRef eq 'SCALAR') { }
0 0 elsif (ref $contRef eq 'CODE') { }
123 0 0 if ($^O eq 'MacOS') { }
137 0 0 if ($^O eq 'MacOS') { }
152 0 0 if ($^O eq 'MacOS') { }
154 0 0 unless ($mail->smtpsend)
160 0 0 unless (close SENDMAIL)
161 0 0 $! ? :
171 0 0 if ($^O eq 'MacOS') { }