sub blackbox { $_[0] = 123 }   # results in { 'foo' => 123 }