Condition Coverage

blib/lib/WWW/Shorten/Bitly.pm
Criterion Covered Total %
condition 6 118 5.0


and 3 conditions

line !l l&&!r l&&r condition
55 0 0 0 $url and &blessed($url)
0 0 0 $url and &blessed($url) and $url->isa('URI')
65 0 0 0 $content_type and $content_type =~ m[application/json]
76 0 0 0 @_ == 1 and ref $_[0]
0 0 0 @_ == 1 and not ref $_[0]
105 0 2 0 $path and $path->is_file
113 0 0 0 $line and $line =~ /=/
118 0 0 0 $key and $val
131 0 0 90 defined $input and not ref $input
0 0 90 defined $input and not ref $input and length $input
140 2 0 0 @_ == 1 and ref $_[0]
304 0 0 0 $username and $password
309 0 0 0 $id and $secret
331 0 0 0 $content_type and $content_type =~ m[application/json]
362 0 0 0 $_[0] and &blessed($_[0])
0 0 0 $_[0] and &blessed($_[0]) and $_[0]->isa('WWW::Shorten::Bitly')
373 0 0 0 $_[0] and &blessed($_[0])
0 0 0 $_[0] and &blessed($_[0]) and $_[0]->isa('WWW::Shorten::Bitly')

or 2 conditions

line l !l condition
19 0 4 $ENV{'BITLY_API_URL'} || 'https://api-ssl.bitly.com'
24 90 0 _trim(shift()) || ''
110 0 0 _trim($line) || ''
116 0 0 _trim($key) || ''
172 0 0 $args->{'domain'} || $args->{'url'} || $args->{'single_arg'} || ''
195 0 0 $args->{'link'} || $args->{'single_arg'} || ''
209 0 0 $args->{'unit'} || 'day'
0 0 $args->{'units'} || '-1'
0 0 $args->{'timezone'} || 'America/New_York'
0 0 $args->{'limit'} || 100
0 0 $args->{'unit_reference_ts'} || 'now'
220 0 0 $args->{'link'} || $args->{'single_arg'} || ''
235 0 0 $args->{'link'} || $args->{'single_arg'} || ''
248 0 0 $args->{'unit'} || 'day'
0 0 $args->{'units'} || '-1'
0 0 $args->{'timezone'} || 'America/New_York'
0 0 $args->{'limit'} || 100
0 0 $args->{'unit_reference_ts'} || 'now'
259 0 0 $args->{'shortUrl'} || $args->{'URL'} || $args->{'url'} || $args->{'single_arg'} || ''
279 0 0 $args->{'shortUrl'} || $args->{'single_arg'} || ''
346 0 0 $args->{'url'} || $args->{'single_arg'} || ''
393 0 0 $args->{'link'} || $args->{'single_arg'} || ''
406 0 0 $args->{'unit'} || 'day'
0 0 $args->{'units'} || -1
0 0 $args->{'timezone'} || 'America/New_York'
0 0 $args->{'limit'} || 100
0 0 $args->{'unit_reference_ts'} || 'now'
417 0 0 $args->{'longUrl'} || $args->{'single_arg'} || $args->{'URL'} || $args->{'url'} || ''
418 0 0 $args->{'domain'} || undef

or 3 conditions

line l !l&&r !l&&!r condition
366 0 0 0 $self ||= 'WWW::Shorten::Bitly'->new(@_)
377 0 0 0 $self ||= 'WWW::Shorten::Bitly'->new(@_)