X-Git-Url: https://www.fi.muni.cz/~kas/git//home/kas/public_html/git/?a=blobdiff_plain;ds=sidebyside;f=leaderboard;h=42874cdcb4b3d6150b9445663d1b9c5f634881ff;hb=be9f3664c99486bc2362d50fcd6c6c956ded4d3d;hp=cc2ed5b7cd5c04df71ee6f01e1fd28f8d7417dfe;hpb=50e9ae670d01536489c1651b11aa1cf040bd95eb;p=aoc.git diff --git a/leaderboard b/leaderboard index cc2ed5b..42874cd 100755 --- a/leaderboard +++ b/leaderboard @@ -11,18 +11,21 @@ my $board_id = 652041; my $my_name = 'Yenya'; my $day = (localtime(time))[3]; my $mode = 'r'; -my $cached = curfile->sibling('cache.json'); +my $force; getopt 'n|name=s' => \$my_name, 'd|day=i' => \$day, '1|first-task' => sub { $mode = '1' }, '2|second-task' => sub { $mode = '2' }, 'r|relative' => sub { $mode = 'r' }, - 'b|board=i' => \$board_id + 'b|board=i' => \$board_id, + 'f|force' => \$force 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"; +if ($force || !$cached->stat || time - $cached->stat->mtime > 900) { + 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",