print $array[2]->[0], $/;