As of at least v5.1.1, most all the browser user agent stuff is in one subroutine in DADA/App/Guts.pm - looks like this:
- Code: Select all
sub grab_url {
my $url = shift;
eval { require LWP::Simple };
if($@){
carp "LWP::Simple not installed! $!";
return undef;
}else{
eval { $LWP::Simple::ua->agent('Mozilla/5.0 (compatible; ' . $DADA::CONFIG::PROGRAM_NAME . ')'); };
my $tmp = undef;
$tmp = LWP::Simple::get($url);
$tmp = safely_decode($tmp);
return $tmp;
}
}
So, you can just change that string,
- Code: Select all
Mozilla/5.0 (compatible; ' . $DADA::CONFIG::PROGRAM_NAME . ')
To whatever you'd like.
It's possible the Send a Webpage stuff is different.

