| line |
true |
false |
branch |
|
38
|
1 |
14 |
substr($_, 0, 1) eq ':' ? : |
|
39
|
0 |
19 |
unless exists $machines{$_} |
|
40
|
0 |
19 |
if $XML::SAX::Machines::debug |
|
41
|
0 |
19 |
unless eval "use $machines{$_}; sub $_ { $machines{$_}->new( \@_ ) }; 1;" |
|
88
|
0 |
14 |
if @errors |
|
145
|
0 |
65 |
if @_ > 2 |
|
148
|
0 |
65 |
unless $$XML::SAX::Machines::Config::ExpectedProcessorClassOptions{$option} |
|
164
|
17 |
0 |
if exists $$XML::SAX::Machines::Config::ProcessorClassOptions{$class} and exists $$XML::SAX::Machines::Config::ProcessorClassOptions{$class}{$option} and defined $$XML::SAX::Machines::Config::ProcessorClassOptions{$class}{$option} |
|
172
|
33 |
15 |
unless @{"${class}::ISA";} |
|
178
|
0 |
16 |
if $_ eq 'Exporter' or $_ eq 'DynaLoader' |
|
180
|
2 |
14 |
if defined $value |
|
183
|
46 |
2 |
unless $value |