From: Jan "Yenya" Kasprzak Date: Thu, 2 Dec 2021 08:36:27 +0000 (+0100) Subject: leaderboard: separate cache for each leaderboard X-Git-Url: https://www.fi.muni.cz/~kas/git//home/kas/public_html/git/?p=aoc2021.git;a=commitdiff_plain;h=b214307f5d69c29fc28cd10a9f70a314aeea73d4 leaderboard: separate cache for each leaderboard --- 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",