*{$package . "::" . $name} = sub :lvalue {