Select Code to Download

$array[0]{'key'} = "testline";
$item = $array[0];
print $item->{key}; #will print "testline"

%item = %{$array[0]};
print $item{key};