$imagetag = 0;
        open(INFILE, "lynx -source http://www.userfriendly.org/static/|");
        while (<INFILE>) {
                next if $image;
                if (/.*(IMG ALT\=\"Latest Strip\" height\=219 width\=576 BORDER\=0 SRC\=\"http:\/\/www.userfriendly.org\/cartoons\/archives\/.+<\/A>).*/) {
                        $imagetag = $1;
                        if ($imagetag =~ /.* ALT\s*=\s*"Latest Strip" .*/i) {
                                if ($imagetag =~ /.*(\/cartoons\/archives\/.+f).*/i) {
                                        $image = $1;
                                        $image =~ s/xuf/uf/;
                                        `lynx -source http://www.userfriendly.org$image > ufieimage.gif`;
                                        # i like jpgs, deal.
                                        `convert ufieimage.gif ufieimage.jpg`;
                                        unlink("ufieimage.gif");
                                }
                        }
                }
        }