X-Git-Url: http://git.ieval.ro/?a=blobdiff_plain;f=t%2F50-network.t;fp=t%2F50-network.t;h=7392c85c8f4727f6f4268f66731ce2d9321b4357;hb=d59bef6021782d05f2f07a38e2cdfd6f16ba1680;hp=98d0c686e125e89a1fd8afa7b2bebff3ba4216cc;hpb=5efa7b2c0f2f16c5a2db5f4a87efa1897dc17f66;p=www-offliberty.git diff --git a/t/50-network.t b/t/50-network.t index 98d0c68..7392c85 100644 --- a/t/50-network.t +++ b/t/50-network.t @@ -7,11 +7,11 @@ use Test::More tests => 4; use WWW::Offliberty qw/off/; my @results; -@results = off "https://youtube.com/watch?v=dQw4w9WgXcQ"; -cmp_ok @results, '>=', 1, 'youtube'; +@results = off 'https://vimeo.com/45196609'; +cmp_ok @results, '>=', 1, 'vimeo'; -@results = off "https://youtube.com/watch?v=dQw4w9WgXcQ", video_file => 1; -is @results, 2, 'youtube, video_file => 1'; +@results = off 'https://vimeo.com/45196609', video_file => 1; +is @results, 2, 'vimeo, video_file => 1'; like $results[1], qr/\.mp4/, 'video URL contains ".mp4"'; unlike $results[0], qr/offwarning/, 'audio URL doesn\'t contain "offwarning"';