in reply to UserFriendly.org Full Size version forwarder :)
while i presume this will work, i shall also assume you've overlooked the fact that illiad likes to trip people up with his cataloging system for the script. by my count it has changed 4 times (maybe 3) since the start of UF, therefore, while this code does make a nasty call to lynx that could prolly be done better with lwp or something it is a bit safer, less he change it again
$imagetag = 0; open(INFILE, "lynx -source http://www.userfriendly.org/static/ +|"); while (<INFILE>) { next if $image; if (/.*(IMG ALT\=\"Latest Strip\" height\=219 width\=5 +76 BORDER\=0 SRC\=\"http:\/\/www.userfriendly.org\/cartoons\/archives +\/.+<\/A>).*/) { $imagetag = $1; if ($imagetag =~ /.* ALT\s*=\s*"Latest Strip" +.*/i) { if ($imagetag =~ /.*(\/cartoons\/archi +ves\/.+f).*/i) { $image = $1; $image =~ s/xuf/uf/; `lynx -source http://www.userf +riendly.org$image > ufieimage.gif`; # i like jpgs, deal. `convert ufieimage.gif ufieima +ge.jpg`; unlink("ufieimage.gif"); } } } }
charlie schmidt
ishamael@themes.org
www.diablonet.net/~ishamael/
|
---|
Replies are listed 'Best First'. | |
---|---|
RE: RE: UserFriendly.org Full Size version forwarder :)
by merlyn (Sage) on Aug 08, 2000 at 06:38 UTC | |
RE: RE: UserFriendly.org Full Size version forwarder :)
by Yohimbe (Pilgrim) on Aug 08, 2000 at 04:46 UTC |
In Section
Code Catacombs