sub update {
  my ( $url, $dir ) = @_;
  my @possible_suffixes = qw( .gz .bz2 );
  my $basename = extract_basename( $url, @possible_suffixes );
  my $local_file = "$dir/$basename";