Help for this page
sub copy_hash { my $hr = shift // return {}; ... @$copy{keys %$hr} = value %$hr; $copy; }
sub copy_hash {{%{$_[0]//{}}}}
my %copy = %+;
www.com | www.net | www.org
No recent polls found