test->function;
print "$test::yeah\n";

package test;

sub function {
    our $yeah = 7;
}