package UNIVERSAL;

sub foo () { 23 }

package main;

warn main->foo;
warn Foo->foo;
warn Bar->foo;
warn Baz->foo;