Ubuntu Manpages

SHARYANTO::Hash::Util

Hash utilities

version 0.53

 use SHARYANTO::Hash::Util qw(rename_key);
 my %h = (a=>1, b=>2);
 rename_key(\%h, "a", "alpha"); # %h = (alpha=>1, b=>2)

Rename key. This is basically $hash{$new_key} = delete $hash{$old_key} with a couple of additional checks. It is a shortcut for:

 die unless exists $hash{$old_key};
 die if     exists $hash{$new_key};
 $hash{$new_key} = delete $hash{$old_key};

None are exported by default, but they are exportable.

Steven Haryanto <stevenharyanto@gmail.com>

This software is copyright (c) 2013 by Steven Haryanto.

This is free software; you can redistribute it and/or modify it under the same terms as the Perl 5 programming language system itself.