@all_p_fruits = @{$h{fruits}->{p}};