X-Git-Url: http://git.ieval.ro/?a=blobdiff_plain;f=t%2FWebService-Strike.t;fp=t%2FWebService-Strike.t;h=853a98fac898b0e04f31956b230097b38b549ad6;hb=0eff1663d01977542009b247f9632a891d8a6a87;hp=7b7a98441de49a091433b2965d8cea71ef9a5e83;hpb=d932afd835dfedc68511a0b80cc84d5fd0eac91d;p=webservice-strike.git

diff --git a/t/WebService-Strike.t b/t/WebService-Strike.t
index 7b7a984..853a98f 100644
--- a/t/WebService-Strike.t
+++ b/t/WebService-Strike.t
@@ -4,7 +4,7 @@ use warnings;
 
 use Data::Dumper qw/Dumper/;
 use Test::RequiresInternet qw/getstrike.net 443/;
-use Test::More tests => 10;
+use Test::More tests => 11;
 use Try::Tiny;
 BEGIN { use_ok('WebService::Strike') };
 
@@ -43,3 +43,6 @@ try {
 
 my $p = strike_search 'Perl', 1;
 is @{$p->file_names}, $p->count, 'file_names has count elements';
+
+my $imdb = strike('ED70C185E3E3246F30B2FDB08D504EABED5EEA3F')->imdb;
+is $imdb->{title}, 'The Walking Dead', 'imdb title';