![]() |
![]() |
![]() |
![]() |
![]() |
![]() |
require WWW::RobotRules::AnyDBM_File; require LWP::RobotUA;
# Create a robot useragent that uses a diskcaching RobotRules my $rules = new WWW::RobotRules::AnyDBM_File 'my-robot/1.0', 'cachefile'; my $ua = new WWW::RobotUA 'my-robot/1.0', 'me@foo.com', $rules;
# Then just use $ua as usual $res = $ua->request($req);
The constructor (the new()
method) takes an extra argument
specifying the name of the DBM file to use. If the DBM file already exists,
then you can specify undef as agent name as the name can be obtained from
the DBM database.
$CommentsMailTo = "perl5@dcs.ed.ac.uk"; include("../../syssies_footer.inc");?>