Condition Coverage

blib/lib/Business/CanadaPost.pm
Criterion Covered Total %
condition 0 101 0.0


and 3 conditions

line !l l&&!r l&&r condition
156 0 0 0 $item{'length'} and $item{'width'}
0 0 0 $item{'length'} and $item{'width'} and $item{'height'}
412 0 0 0 $fromyear == $toyear and $frommon == $tomon
0 0 0 $fromyear == $toyear and $frommon == $tomon and $fromday == $today
413 0 0 0 $fromyear and $frommon
0 0 0 $fromyear and $frommon and $fromday
0 0 0 $fromyear and $frommon and $fromday and $toyear
0 0 0 $fromyear and $frommon and $fromday and $toyear and $tomon
0 0 0 $fromyear and $frommon and $fromday and $toyear and $tomon and $today
418 0 0 0 $fromyear == $toyear and $frommon == $tomon
0 0 0 $fromyear == $toyear and $frommon == $tomon and $fromday == $today
434 0 0 0 $year % 4 == 0 and $year % 400 == 0

or 2 conditions

line l !l condition
60 0 0 $lang || 'en'
94 0 0 $id || ' '
115 0 0 $code || ' '
124 0 0 $code || ' '
132 0 0 $province || ' '
140 0 0 $code || ' '
148 0 0 sprintf('%01.2f', $price) || '0.00'
168 0 0 $item{'quantity'} || 1
0 0 $item{'description'} || ' '
273 0 0 shift() || 1
285 0 0 shift() || 1
297 0 0 shift() || 1
308 0 0 shift() || 1
320 0 0 shift() || 1
332 0 0 shift() || 1
344 0 0 shift() || 1
449 0 0 $$self{'language'} || 'en'
0 0 $$self{'merchantid'} || (return $self->_error(7), $$self{'frompostalcode'} ? '' . $$self{'frompostalcode'} . "\n" : '', $$self{'turnaroundtime'} ? '' . $$self{'turnaroundtime'} . "\n" : '', $$self{'totalprice'} || '0.00', "\n")
499 0 0 $$self{'postalcode'} ||= ' '
503 0 0 $$self{'city'} || ' '
0 0 $$self{'provstate'} || ' '
0 0 $$self{'postalcode'} || ' '

or 3 conditions

line l !l&&r !l&&!r condition
58 0 0 0 $lang eq 'fr' or $lang eq 'en'
0 0 0 $lang eq 'fr' or $lang eq 'en' or $lang eq ''
105 0 0 0 $units eq 'metric' or $units eq 'imperial'
481 0 0 0 not $$self{'country'} or $$self{'country'} =~ /^\s*$/
0 0 0 uc $$self{'country'} eq 'CANADA' or uc $$self{'country'} eq 'CA'
0 0 0 uc $$self{'country'} eq 'UNITED STATES' or uc($$self{'country'} eq 'US')
0 0 0 uc $$self{'country'} eq 'UNITED STATES' or uc($$self{'country'} eq 'US') or uc $$self{'country'} eq "\311TATS-UNIS"