#!/usr/bin/perl use LWP::Simple; my $webpage = get('http://www.dilbert.com'); $webpage =~ /<a href=\"\/comics\/dilbert\/archive\/images\/(dilbert\d+ +\.gif)\"/; getstore("http://www.dilbert.com/comics/dilbert/archive/images/$1",".. +/$1");
|
---|
Replies are listed 'Best First'. | |
---|---|
Re: Dilbert Archive Script
by merlyn (Sage) on Jan 10, 2001 at 00:41 UTC | |
Re: Dilbert Archive Script
by aardvark (Pilgrim) on Feb 22, 2001 at 04:17 UTC |