$new{foo}{baz}='new';
print $hash{foo}{baz},"\n"; #prints new