sub pkg_alias($original, $new) { #Any sufficiently encapsulated hack... no strict 'refs'; %{"${original}::"} := %{"${new}::"}; #XXX will this actually work? }