X-Git-Url: https://ruin.nu/git/?a=blobdiff_plain;f=scripts%2Ffetchdumps.pl;h=883c90f37c2a3edb4822c27d9ea913a91c9b6591;hb=d786ab3e431fdb29854f4d80fe430c5438d649b6;hp=1bb0736fb3093e04bbd51069f203666a43df77ed;hpb=b52c7c95096825846f53e73de627e6cda01d9bca;p=ndwebbie.git diff --git a/scripts/fetchdumps.pl b/scripts/fetchdumps.pl index 1bb0736..883c90f 100755 --- a/scripts/fetchdumps.pl +++ b/scripts/fetchdumps.pl @@ -22,10 +22,12 @@ q{ use strict; use warnings; +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"; @@ -58,9 +60,8 @@ if ($updated){ `perl $FindBin::Bin/parsegalaxies.pl $updated`; `perl $FindBin::Bin/ndrank.pl`; $dbh->do(q{UPDATE misc SET value = ? WHERE id = 'TICK'}, undef, $updated); - system 'killall','-USR1', 'irssi'; + system 'killall','-USR1', 'ndbot.pl'; local $dbh->{Warn} = 0; - $dbh->do(q{VACUUM ANALYZE}); }