package My::This;
sub thing { print 'This' }

package My::That;
sub thing { print 'That' }

package main;
&My::This::thing; # prints This
&My::That::thing; # prints That