sub foo {
   $_[0] = { all => "new" };
}