| 1 | Index: imdb.pl |
|---|
| 2 | =================================================================== |
|---|
| 3 | --- imdb.pl (revision 17758) |
|---|
| 4 | +++ imdb.pl (working copy) |
|---|
| 5 | @@ -279,11 +279,8 @@ |
|---|
| 6 | |
|---|
| 7 | # look for references to impawards.com posters - they are high quality |
|---|
| 8 | my $site = "http://www.impawards.com"; |
|---|
| 9 | - my $impsite = parseBetween($response, "<a href=\"".$site, "\">".$site); |
|---|
| 10 | + my $impsite = parseBetween($response, "<a href=\"".$site, "\">"); |
|---|
| 11 | |
|---|
| 12 | - # jersey girl fix |
|---|
| 13 | - $impsite = parseBetween($response, "<a href=\"http://impawards.com","\">http://impawards.com") if ($impsite eq ""); |
|---|
| 14 | - |
|---|
| 15 | if ($impsite) { |
|---|
| 16 | $impsite = $site . $impsite; |
|---|
| 17 | |
|---|
| 18 | @@ -316,6 +313,21 @@ |
|---|
| 19 | } |
|---|
| 20 | } |
|---|
| 21 | |
|---|
| 22 | + # try looking on MoTechPosters |
|---|
| 23 | + if ($uri eq "" && $response =~ m/<a href="([^"]*)">([^"]*?)motechposters/i) { |
|---|
| 24 | + if ($1 ne "") { |
|---|
| 25 | + if (defined $opt_d) { print "# found MoTechPosters poster page: $1 \n"; } |
|---|
| 26 | + my $cinres = get $1; |
|---|
| 27 | + if (defined $opt_d) { printf("# got %i bytes\n", length($cinres)); } |
|---|
| 28 | + if (defined $opt_r) { printf("%s", $cinres); } |
|---|
| 29 | + |
|---|
| 30 | + if ($cinres =~ m/<img src="([^"]*?$movieid[^"]*?)"/i) { |
|---|
| 31 | + if (defined $opt_d) { print "# MoTechPosters url retreived\n"; } |
|---|
| 32 | + $uri = "http://posters.motechnet.com".$1; |
|---|
| 33 | + } |
|---|
| 34 | + } |
|---|
| 35 | + } |
|---|
| 36 | + |
|---|
| 37 | # try looking on nexbase |
|---|
| 38 | if ($uri eq "" && $response =~ m/<a href="([^"]*)">([^"]*?)nexbase/i) { |
|---|
| 39 | if ($1 ne "") { |
|---|