| CC: | simon [...] duanedibley.com |
| Subject: | Possible bug in IMDB::FIlm |
| Date: | Sun, 28 Jun 2009 15:53:59 -0700 |
| To: | bug-IMDB-Film [...] rt.cpan.org |
| From: | simon burke <simon [...] duanedibley.com> |
OS: Ubuntu 8.04
PV: Linux version 2.6.24-23-generic (buildd@crested) (gcc version 4.2.3 (Ubuntu 4.2.3-2ubuntu7)) #1 SMP Mon Jan 26 01:04:16 UTC 2009
PERL: v5.8.8 built for x86_64-linux-gnu-thread-multi
OSV: Linux htpc2 2.6.24-23-generic #1 SMP Mon Jan 26 01:04:16 UTC 2009 x86_64 GNU/Linux
IMDB::FIlm 0.37 updated cpan Jun 28 2009 15:47pm PST (also failed on 0.36)
IMDB:Film fails on specific imdb code value
code sample (cut from custom module IMDBinfo.pm lines 207-218
my $imdb2 = "XXXXX" # set to value before execution
my $imdbObj = undef;
eval {
$imdbObj = new IMDB::Film(crit => $imdb2);
};
if ($@) {
print "IMDBinfo::GetInfo($uid,$imdb) failed to get URL for imdb $imdb2\n";
print "IMDBinfo::GetInfo() $@\n";
} else {
print "IMDBinfo::GetInfo() for $imdb2\n";
}
Works
$imdb2 = "993918"
std out
NI(3) (17898) HTPC2::HTPCinfo/IMDBinfo::GetInfo(da01b11d054960c1ac17f966832d4461,0993918)
NI(3) (17898) HTPC2::HTPCinfo/IMDBinfo::GetInfo() for 993918
NI(3) (17898) HTPC2::HTPCinfo/IMDBinfo::GetInfo() done in 1950 mS (1912 mS web access)
Fails
$imdb2 = "993917"
std out
Use of uninitialized value in concatenation (.) or string at /usr/local/share/perl/5.8.8/IMDB/Film.pm line 417.
NI(3) (18421) HTPC2::HTPCinfo/IMDBinfo::GetInfo(861d23b76bf741418924327434610e1e,0993917)
NI(3) (18421) HTPC2::HTPCinfo/IMDBinfo::GetInfo(861d23b76bf741418924327434610e1e,0993917) failed to get URL for imdb 993917
NI(3) (18421) HTPC2::HTPCinfo/IMDBinfo::GetInfo() [CRITICAL] Cannot retrieve url [http://www.imdb.com/title/tt/episodes] at /opt/devel/htpc/htpc2/modules/HTPC2/IMDBinfo.pm line 210
Not sure what doing wrong, seems very reproducable . There are many other cases that fail
(try following in BSG season 4 993928,993911,993917)
any questions or additional data required, feel free to mail me at simon@duanedibley.com
Cheers
Simon