use LWP::Simple;
use DBI;
$dbh = DBI->connect("DBI:mysql:database=<foo>",<username>,<password>);
$page = get('<url>');
$sth = $dbh->prepare("insert into <table> values ?,?,?");
while($page =~ /<regular expression which grabs 3 things>/g){
$sth->execute($1,$2,$3);
}
# strict, warnings, add "or die" messages, exercise for the reader etc.
posted by zsazsa at 9:25 AM on January 21, 2008