LWP::Simple fix for cloudfare

[ndwebbie.git] / scripts / fetchdumps.pl

diff --git a/scripts/fetchdumps.pl b/scripts/fetchdumps.pl
index b64200f355318487bef1e9fc69a4ba9469fd7cf4..883c90f37c2a3edb4822c27d9ea913a91c9b6591 100755 (executable)
--- a/scripts/fetchdumps.pl
+++ b/scripts/fetchdumps.pl
@@ -26,7 +26,8 @@ use local::lib;
 use DBI;
 use DBD::Pg qw(:pg_types);
 
-use LWP::Simple;
+use LWP::Simple qw/head get $ua/;
+$ua->agent("Stupid user agent check is stupid");
 
 use FindBin;
 use lib "$FindBin::Bin/../lib";