Branch Coverage

blib/lib/StreamFinder/Youtube.pm
Criterion Covered Total %
branch 0 140 0.0


line true false branch
325 0 0 unless $url
328 0 0 if (open IN, $p)
332 0 0 if /^\s*\#/o
342 0 0 if defined $uops{$i}
345 0 0 unless defined $uops{'agent'}
346 0 0 unless defined $uops{'timeout'}
347 0 0 if defined $uops{'debug'}
348 0 0 if defined $uops{'fast'}
351 0 0 if ($_[0] =~ /^\-?debug$/o) { }
0 0 elsif ($_[0] =~ /^\-?fast$/o) { }
353 0 0 defined $_[0] && $_[0] =~ /^[0-9]$/ ? :
356 0 0 defined $_[0] && $_[0] =~ /^[0-9]$/ ? :
360 0 0 if $DEBUG
364 0 0 if ($url2fetch =~ /^https?\:/) { }
365 0 0 if $url2fetch =~ m[\/([^\/]+)\/?$]
372 0 0 if $DEBUG
381 0 0 defined $uops{'format'} ? :
0 0 defined $uops{'youtube-dl-args'} ? :
385 0 0 if (defined $uops{'userid'} and defined $uops{'userpw'}) { }
392 0 0 if $DEBUG
394 0 0 unless ($try or scalar @ytdldata > 0)
398 0 0 if $1
400 0 0 unless scalar @ytdldata > 0
402 0 0 unless ($ytdldata[0] =~ m[^https?\:\/\/])
410 0 0 unless m[^https?\:\/\/]o
411 0 0 if ($more) { }
418 0 0 if $self->{'cnt'} > 1
420 0 0 unless ($try or $self->{'cnt'} > 0)
424 0 0 if $1
429 0 0 unless ($FAST or not $url2fetch =~ /\b(?:youtube\.|youtu.be|ytimg\.)\b/)
430 0 0 if $DEBUG
437 0 0 if ($response->is_success) { }
440 0 0 if $DEBUG
442 0 0 unless ($no_wget)
443 0 0 if $DEBUG
448 0 0 if ($html =~ s/\]\}\,\"title\"\:\{\"runs\"\:\[\{\"text\"\:\"([^\"]+)\"\,\"navigationEndpoint\"\:([^\}]+)//s)
451 0 0 if $two =~ /\"url\"\:\"([^\"]+)/
453 0 0 if ($html =~ s/\"videoDetails\"\:\{\"videoId\"\:\"([^\"]+)\"([^\}]+)//s)
456 0 0 if $two =~ /\"title\"\:\"([^\"]+)/
457 0 0 if $two =~ /\"thumbnails\"\:\[\{\"url\"\:\"([^\"]+)/
460 0 0 if ($html =~ /\"dateText\"\:\{([^\}]+)\}/s)
462 0 0 if $one =~ /(\d\d\d\d)/
467 0 0 $self->{'cnt'} > 0 ? :
468 0 0 if $DEBUG
469 0 0 if $DEBUG
470 0 0 if ($self->{'description'} =~ /\w/) { }
480 0 0 if $DEBUG
492 0 0 wantarray ? :
498 0 0 defined $_[0] ? :
499 0 0 $arglist =~ /\b\-?random\b/ ? :
500 0 0 if ($arglist =~ /\b\-?noplaylists\b/ and do { $$self{'streams'} }->[$idx] =~ /\.(pls|m3u8?)$/i)
503 0 0 if $DEBUG
510 0 0 if ($response->is_success) { }
513 0 0 if $DEBUG
515 0 0 unless ($no_wget)
516 0 0 if $DEBUG
522 0 0 if ($plType =~ /pls/) { }
525 0 0 if ($line =~ /^\s*File\d+\=(.+)$/o) { }
0 0 elsif ($line =~ /^\s*Title\d+\=(.+)$/o) { }
534 0 0 if $DEBUG
538 0 0 if ($line =~ /^\s*([^#].+)$/o)
542 0 0 $urlpart =~ /https?\:/o ? :
546 0 0 if $DEBUG
574 0 0 if defined $_[0] and $_[0] =~ /^\-?(?:long|desc)/i
587 0 0 unless $self->{'iconurl'}
594 0 0 if ($response->is_success) { }
597 0 0 if $DEBUG
599 0 0 unless ($no_wget)
600 0 0 if $DEBUG
605 0 0 unless $art_image