Branch Coverage

blib/lib/WWW/Asg.pm
Criterion Covered Total %
branch 16 26 61.5


line true false branch
65 3 0 unless $$self{'ua'}
80 0 0 unless $res->is_success
92 0 0 unless $res->is_success
108 2 20 unless $video and %$video
120 2 20 unless $link_node
125 0 20 unless $url =~ m[(http://asg\.to)?/contentsPage\.html\?mcd=([^?&]+)]
133 0 20 if $title =~ /.+\x{30a2}\x{30c0}\x{30eb}\x{30c8}\x{52d5}\x{753b}:(.+)/
140 19 1 if $description =~ /.*\x{7d39}\x{4ecb}\x{6587}\x{ff1a}\s*(.+)/
153 20 0 if ($ccd =~ m[(http://asg\.to)?/categoryPage\.html\?ccd=([^?&]+)])
160 19 1 if ($play_time =~ /.*\s([0-9]{1,3}:[0-9]{1,2}).*/)
180 22 4 if ($date_str =~ /.*([0-9]{2,4}\.[0-9]{2}\.[0-9]{2} [0-9]{2}:[0-9]{2}).*/) { }
4 0 elsif ($date_str =~ /.*([0-9]{4}\-[0-9]{2}\-[0-9]{2}T[0-9]{2}:[0-9]{2}(:[0-9]{2}Z)?).*/) { }
200 105 0 if $str