Thank you for interesting examples.

It's another interesting result, that follow from tobyink's link

$ perl -E'package Foo::Bar; say Foo->can("can")'
CODE(0x1f4a220)
[download]

I think, perl just show to symbol table and if data about package exists, that means package exists too, so perl starts inheritance. Otherwise it uses UIVERSAL without inheritance.