foreach (keys %in) { $$_ = in{$_}; }