Select Code to Download

my $h = from_json( to_json( { a => 1, b => 2, c => [ 1..10 ], d => { '
+a'..'z' } } ) );;

my %h = %{ from_json( to_json( { a => 1, b => 2, c => [ 1..10 ], d => 
+{ 'a'..'z' } } ) ) };;

print $h{a};;
1