File Coverage

blib/lib/HTML/Video/Embed/Site/FunnyOrDie.pm

Criterion	Covered	Total	%
statement	10	10	100.0
branch	3	4	75.0
condition			n/a
subroutine	3	3	100.0
pod	0	2	0.0
total	16	19	84.2

package HTML::Video::Embed::Site::FunnyOrDie;
use Moo;

with 'HTML::Video::Embed::Module';

our $VERSION = '0.016000';
$VERSION = eval $VERSION;

sub domain_reg {
    qr/funnyordie\.com/;
}

sub process {
    my ( $self, $embeder, $uri ) = @_;

    return undef if $embeder->secure;
    if ( my ( $vid ) = $uri->path =~ m|^/videos/(\w+)| ) {
        return qq||;
    }

    return undef;
}

1;