my %hash = ('one' => 'two', 'two' => '2');
undef $hash{'one'};
print keys %hash;