Help for this page
use strict; use Data::Dumper; ... $x = { %$x, %$y }; print Dumper($x);
$VAR1 = { 'c' => 3, 'a' => 1, ... 'bbb' => 11 } };
use Hash-Dumper qw/merge/;
$x = { %$x, %$y };
$x = merge( $x, $y );
$VAR1 = { 'c' => 3, ... 'aaa' => 11 } };
www.com | www.net | www.org
No recent polls found