package Wrong; *{'Right::new'} = sub { ... SUPER ... };

##</code><code>##

package Wrong; sub Right::new { ... SUPER ... }

##</code><code>##

package Right; sub new { ... SUPER ... }

##</code><code>##

package Wrong; sub Right::new { package Right; ... SUPER ... }