$array[1] = { val => "The initial value for 1", one => 'undef' };
$array[0] = { val => "The initial value for 0", one => \$array[1]{val} };
$array[2] = { val => "The initial value for 2", one => \$array[1]{val} };
$array[3] = { val => "The initial value for 3", one => \$array[1]{val} };