package Foo;
use strict;
use warnings;

sub call { uc(__PACKAGE__) }

1;