Errto

Your example and error message, makes me think that TYPEGLOB aliasing is basically a very shallow operation. Basically that it does not go any deeper than the top level GLOB. If you were to change the alias line to:

*Bar::new = \*Foo::new;
[download]

I get the following output:

Expected class: Bar
[download]

So that makes me think that somehow doing a typeglob assignment on the symbol-table hash doesn't do what you'd expect it to.

But you aren't doing it on the symbol table hash, you are doing it on the TYPEGLOB. Although oddly enough, if you do this:

%Bar:: = %Foo::;
my $x = Bar::new('Bar');
[download]

I get the same error you got with your example:

Undefined subroutine &Bar::new
[download]

Now that is something I wouldn't expect to happen.