package main;
sub _ { print "Foo!\n" }
*% = sub { print "Bar!\n" };

package test;
_();
&%();