Perl slices (arrays and hashes) two

Slicing usage can extract values from arrays and hashes
my @array = qw (aa bb cc dd); my @select = @array [1,3]; print "@select \ n"; ## output bb dd123456
Value in hash
my% hash = ("a" => 1, "b" => 2, "c" => 3, "d" => 4,); my @select = @hash {qw (ac)}; ## Extract the value corresponding to key 'a''c' print "@select \ n"; ## Output is 1 31234567891011
Hash-of-hash
my% hash = ("a" => 1, "b" => 2, "c" => 3, "d" => 4,); my% select =% hash {qw (ac)}; ## Extract the hashmap with key 'a''c' {print "$ _ => $ select {$ _} \ n"} keys% select; ## The output is: a => 1c => 3


perl slicing (array and hash) two