$ perl -e 'package Foo::Bar; sub Foo {1}; sub Foo::Bar {1}; package main; Foo::Bar->Foo'
Can't call method "Foo" without a package or object reference at -e line 1.