Help for this page

Select Code to Download

Select or download this
```
$h{'one'} = [1,2,3];
```
Select or download this
```
print "$h{'one'}[1]\n";
```
Select or download this
```
my @a = $h{'one'};
print "$a[1]\n";
```