Beefy Boxes and Bandwidth Generously Provided by pair Networks
Your skill will accomplish
what the force of many cannot
 
PerlMonks  

RE: UserFriendly.org Full Size version forwarder :)

by ishamael (Beadle)
on Apr 28, 2000 at 17:43 UTC ( #9580=note: print w/ replies, xml ) Need Help??


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/


Comment on RE: UserFriendly.org Full Size version forwarder :)
Download Code
RE: RE: UserFriendly.org Full Size version forwarder :)
by Yohimbe (Pilgrim) on Aug 08, 2000 at 04:46 UTC
    I see a lot of lynx downloads of the gifs. Now I understand why we're getting them. Heh.
RE: RE: UserFriendly.org Full Size version forwarder :)
by merlyn (Sage) on Aug 08, 2000 at 06:38 UTC

Log In?
Username:
Password:

What's my password?
Create A New User
Node Status?
node history
Node Type: note [id://9580]
help
Chatterbox?
and the web crawler heard nothing...

How do I use this? | Other CB clients
Other Users?
Others scrutinizing the Monastery: (4)
As of 2014-09-20 18:14 GMT
Sections?
Information?
Find Nodes?
Leftovers?
    Voting Booth?

    How do you remember the number of days in each month?











    Results (160 votes), past polls