if(exists $arg{I}) {

  my $hreplist = initialize_rep_file($username, $password, $filename);

  db_update( update_replist('I', $hreplist, [keys %$hreplist]) )
    if exists $arg{d};

  exit;
}