template/perl/snip-web-scraper.pl


1
2
3
4
5
6
7
8
9
10

my $scraper = scraper {
	process '{{_cursor_}}', 'data' => 'TEXT';
	result 'data';
};
$scraper->user_agent->env_proxy;

#use YAML::Syck;
#for (@{$scraper->scrape( URI->new('') )}) {
#	print $_->{data}, "\n";
#}