projects
/
www-offliberty.git
/ commitdiff
commit
grep
author
committer
pickaxe
?
search:
re
summary
|
shortlog
|
log
|
commit
| commitdiff |
tree
raw
|
patch
| inline |
side by side
(from parent 1:
335dcc3
)
Add some tests that attempt to catch dummy results
author
Marius Gavrilescu
<marius@ieval.ro>
Sun, 6 Dec 2015 21:52:50 +0000
(23:52 +0200)
committer
Marius Gavrilescu
<marius@ieval.ro>
Sun, 6 Dec 2015 21:52:50 +0000
(23:52 +0200)
t/50-network.t
patch
|
blob
|
blame
|
history
diff --git
a/t/50-network.t
b/t/50-network.t
index 14a9cb9e72dd1bdda4e169e050ed66b9148324ad..c67d2d33d1434896790b334516aafd8a5f112d19 100644
(file)
--- a/
t/50-network.t
+++ b/
t/50-network.t
@@
-3,7
+3,7
@@
use strict;
use warnings;
use Test::RequiresInternet 'offliberty.com' => 80;
-use Test::More tests =>
2
;
+use Test::More tests =>
4
;
use WWW::Offliberty qw/off/;
my @results;
@@
-12,3
+12,6
@@
cmp_ok @results, '>=', 1, 'youtube';
@results = off "http://youtube.com/watch?v=Tj75Arhq5ho", video_file => 1;
is @results, 2, 'youtube, video_file => 1';
+
+like $results[1], qr/\.mp4/, 'video URL contains ".mp4"';
+unlike $results[0], qr/offwarning/, 'audio URL doesn\'t contain "offwarning"';
This page took
0.010545 seconds
and
4
git commands to generate.