##
BEGIN {
require 'Foo/Bar.pm';
Foo::Bar->import(qw(foo bar baz));
}
####
BEGIN {
my ($module, @imports) = qw(Foo::Bar foo bar baz);
(my $file = "$module.pm") =~ s[::][/]g;
require $file;
$module->import(@imports);
}