Help for this page

Select Code to Download


  1. or download this
    for ( keys %hash ) {
  delete $hash{$_} if $hash{$_} == 0;
}