in reply to Newb wrestles with join
use strict; use LWP::Simple; my $url = "http://amazon.com/o/tg/cm/browse-communities/-/" . $circleID . "/t/"; #Request the URL my $content = get($url); die "Could not retrieve $url" unless $content; use HTML::TokeParser; use Data::Dumper; $p = HTML::TokeParser->new(\$content) || die "Can't open: $!"; while (my $token = $p->get_tag( 'title' )) { print Dumper ($token); #... }
|
|---|
| Replies are listed 'Best First'. | |
|---|---|
|
Re^2: Newb wrestles with join
by Dizzley (Novice) on Oct 01, 2005 at 06:58 UTC |