for(keys %USER) {
  $USER{$_}="" unless defined $USER{$_};
}