if ($male) { $hash{$nameplace}{$person}->[0]++; } else { $hash{$nameplace}{$person}->[1]++; } [download]
In reply to Re: Re: Re: Re: DBM by Anonymous Monk in thread DBM by pradeep