my $ret = GetOptions( "u|updated:s");
my $update = $opt_u || die "Usage: $0 -u update_ID\n";