use Foo; my $name = Foo::test("TEST"); print "Name: $name\n";