Branch Coverage

blib/lib/AMF/Perl.pm
Criterion Covered Total %
branch 0 36 0.0


line true false branch
216 0 0 if (@_)
230 0 0 if ($ENV{'MOD_PERL'}) { }
234 0 0 if ($MP2)
257 0 0 unless $file
278 0 0 if ($self->debug)
303 0 0 if ($$header{'key'} eq 'DescribeService')
339 0 0 if ($@)
341 0 0 UNIVERSAL::isa($@, 'AMFException') ? :
382 0 0 if ($ENV{'MOD_PERL'}) { }
390 0 0 unless $MP2
408 0 0 if $dir
416 0 0 if (-d $path) { }
440 0 0 unless $description
469 0 0 if @_
482 0 0 unless (open HANDLE, "> $filepath")
487 0 0 unless (print HANDLE $data)
499 0 0 unless (open HANDLE, ">>$filepath")
504 0 0 unless (print HANDLE $data)