BEGIN { skip "requires 5.20.0" if $^V lt v5.20.0 } # omit
my(@a, $a);
my %slice = %a[1, 2];
%slice = %$a[1, 2]
