package UtilityClass;

use base 'Exporter';

@EXPORT = qw/buttercup/;

sub buttercup {
   my $self = shift; # $self is *not* a 'UtilityClass';
   ...
}