use Acme::Method::CaseInsensitive; package Class; sub foo_bar { print "it works" } Class->FoO_bAR;