Select Code to Download

my @array = (["w", "h", [1, 2], "c"]);
print $array[0]->[0];
print $array[0]->[1];
print $array[0]->[2];