11 lines
211 B
Perl
11 lines
211 B
Perl
|
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";
|
||
|
|
#}
|