| line |
true |
false |
branch |
|
28
|
1 |
5 |
if ref $scheme |
|
40
|
3 |
3 |
if (defined $registered_transport_of{$scheme}) |
|
42
|
1 |
2 |
unless $registered_transport_of{$scheme}->can('new') or eval "require $registered_transport_of{$scheme}" |
|
59
|
1 |
2 |
if (exists $SOAP_LITE_TRANSPORT_OF{$scheme}) |
|
64
|
1 |
0 |
unless $protocol_class->can('new') or eval "require $SOAP_LITE_TRANSPORT_OF{$scheme}" |
|
69
|
0 |
0 |
unless my $transport = eval {
do {
$protocol_class->new(%attrs)
}
} |
|
75
|
1 |
2 |
if (exists $SOAP_WSDL_TRANSPORT_OF{$scheme}) |
|
77
|
0 |
1 |
unless $SOAP_WSDL_TRANSPORT_OF{$scheme}->can('new') or eval "require $SOAP_WSDL_TRANSPORT_OF{$scheme}" |