package Foo {
    our $var = "Hello";
    sub func { print $var, "\n" }
}
package Bar {
    use Symbol::Alias '$Foo::var' => 'var', 'Foo::func' => 'func';
    print $var, "\n";
    func();
}