Branch Coverage

blib/lib/WWW/BetfairNG.pm

Criterion	Covered	Total	%
branch	66	194	34.0

line	true	false	branch
101	3	8	if (@_)
103	1	2	unless (ref $params eq 'HASH')
107	1	6	unless (exists $self->{$key})
149	4	10	if (@_)
167	4	9	if (@_)
187	6	84	if (@_)
206	61	141	if (@_)
234	2	29	if (@_)
237	1	1	$flag ? :
238	2	0	unless ($self->{'p_check'} == $current_state)
239	1	1	$self->{'p_check'} ? :
264	0	0	if (@_)
267	0	0	$flag ? :
357	1	6	unless (@_)
362	1	5	unless (ref $params eq 'HASH')
366	2	3	unless ($params->{'username'} and $params->{'password'})
371	1	2	unless ($cert_file)
376	1	1	unless ($key_file)
381	1	0	unless $got_app_key
395	1	0	unless $got_app_key
396	1	0	unless ($response->{'success'})
401	0	0	unless ($self->{'response'}{'loginStatus'} eq 'SUCCESS')
423	1	3	unless (@_)
428	1	2	unless (ref $params eq 'HASH')
432	2	0	unless ($params->{'username'} and $params->{'password'})
437	0	0	unless $got_app_key
446	0	0	unless $got_app_key
447	0	0	unless ($response->{'success'})
452	0	0	unless ($self->{'response'}{'status'} eq 'SUCCESS')
471	1	0	unless ($self->session)
484	0	0	unless ($response->{'success'})
489	0	0	unless $content
491	0	0	unless ($self->{'response'}{'status'} eq 'SUCCESS')
512	1	1	unless ($self->session)
516	1	0	unless ($self->app_key)
525	0	0	unless ($response->{'success'})
530	0	0	unless $content
532	0	0	unless ($self->{'response'}{'status'} eq 'SUCCESS')
993	0	5	if ($result)
995	0	0	unless ($status eq 'SUCCESS')
997	0	0	if ($result->{'errorCode'})
1077	0	5	if ($result)
1079	0	0	unless ($status eq 'SUCCESS')
1081	0	0	if ($result->{'errorCode'})
1122	0	5	if ($result)
1124	0	0	unless ($status eq 'SUCCESS')
1126	0	0	if ($result->{'errorCode'})
1413	1	2	unless ($self->session)
1417	1	1	unless ($self->app_key)
1439	1	0	unless ($response->{'success'})
1444	0	0	unless $content
1536	49	48	unless ($self->session)
1540	22	26	unless ($self->app_key or $url =~ /DeveloperAppKeys/)
1544	0	26	unless (ref $params eq 'HASH')
1548	0	26	if ($self->check_parameters)
1551	0	0	unless $self->_check_parameter($caller, $params)
1559	22	4	unless ($url =~ /DeveloperAppKeys/)
1563	26	0	unless ($response->{'success'})
1564	26	0	if ($response->{'status'} == 400) { }
1577	0	0	unless $content
1592	3	2	unless ($self->session)
1596	2	0	unless ($self->app_key)
1600	0	0	unless (ref $params eq 'HASH')
1604	0	0	if ($self->check_parameters)
1606	0	0	unless $self->_check_parameter($method_name, $params)
1617	0	0	unless ($response->{'success'})
1618	0	0	if ($response->{'status'} == 400) { }
1631	0	0	unless $content
1633	0	0	if ($self->{'response'}{'error'})
1637	0	0	if ($self->{'response'}{'result'}) { }
1651	0	26	unless ($input)
1657	0	26	unless ($status)
1669	0	0	unless (exists $self->{'data_types'}{$name})
1674	0	0	if ($def->{'type'} eq 'HASH') { }
	0	0	elsif ($def->{'type'} eq 'ARRAY') { }
	0	0	elsif ($def->{'type'} eq 'ENUM') { }
	0	0	elsif ($def->{'type'} eq 'SCALAR') { }
1675	0	0	unless (ref $parameter eq 'HASH')
1682	0	0	unless (exists $fields{$key})
1690	0	0	if ($key eq 'instructions')
1694	0	0	if ($key eq 'from' or $key eq 'to')
1695	0	0	if ($name eq 'transferFunds')
1699	0	0	unless ($self->_check_parameter($check_key, $value))
1705	0	0	if $fields{$_}[0] == 1
	0	0	if (my(@missing) = grep({$fields{$_}[1] == 0 if $fields{$_}[0] == 1;} keys %fields))
1707	0	0	@missing == 1 ? :
1713	0	0	if (my(@repeated) = grep({$fields{$_}[1] > 1;} keys %fields))
1715	0	0	@repeated == 1 ? :
1722	0	0	unless (ref $parameter eq 'ARRAY')
1726	0	0	unless (@$parameter > 0)
1732	0	0	unless ($self->_check_parameter($key, $value))
1739	0	0	if (my $type = ref $parameter)
1742	0	0	$type eq 'array' ? :
1745	0	0	unless (grep {$_ eq $parameter;} @{$$def{'allowed'};})
1753	0	0	if (my $type = ref $parameter)
1756	0	0	$type eq 'array' ? :
1759	0	0	unless ($parameter =~ /$def->{'allowed'}/)