From b214307f5d69c29fc28cd10a9f70a314aeea73d4 Mon Sep 17 00:00:00 2001 From: "Jan \"Yenya\" Kasprzak" Date: Thu, 2 Dec 2021 09:36:27 +0100 Subject: [PATCH] leaderboard: separate cache for each leaderboard --- leaderboard | 5 +++-- 1 file changed, 3 insertions(+), 2 deletions(-) diff --git a/leaderboard b/leaderboard index cc2ed5b..7bc84c4 100755 --- a/leaderboard +++ b/leaderboard @@ -11,7 +11,6 @@ my $board_id = 652041; my $my_name = 'Yenya'; my $day = (localtime(time))[3]; my $mode = 'r'; -my $cached = curfile->sibling('cache.json'); getopt 'n|name=s' => \$my_name, 'd|day=i' => \$day, @@ -20,9 +19,11 @@ getopt 'r|relative' => sub { $mode = 'r' }, 'b|board=i' => \$board_id or die "Usage: $0 [-n username] [-1|-2|-r] [-b board_id]\n"; +my $cache_filename = "cache-$board_id.json"; +my $cached = curfile->sibling($cache_filename); if (!$cached->stat || time - $cached->stat->mtime > 900) { - warn "Downloading cache.json\n"; + warn "Downloading $cache_filename\n"; chomp(my $cookie = curfile->sibling('cookie')->slurp); my $res = Mojo::UserAgent->new->get( "https://adventofcode.com/2021/leaderboard/private/view/$board_id.json", -- 2.43.5