Condition Coverage

blib/lib/WWW/Pastebin/PastebinCa/Create.pm
Criterion Covered Total %
condition 3 10 30.0


and 2 conditions

line l !l condition
41 0 0 carp('first argument to paste() is not defined') and return

and 3 conditions

line !l l&&!r l&&r condition
63 0 1 0 length $args{'expire'} and not exists $Valid_Expires{$args{'expire'}}

or 2 conditions

line l !l condition
23 0 1 $args{'timeout'} ||= 30

or 3 conditions

line l !l&&r !l&&!r condition
24 0 1 0 $args{'mech'} ||= 'WWW::Mechanize'->new('autocheck', 0, 'timeout', $args{'timeout'}, 'agent', 'Mozilla/5.0 (X11; U; Linux x86_64; en-US; rv:1.8.1.12) Gecko/20080207 Ubuntu/7.10 (gutsy) Firefox/2.0.0.12')