use strict;
use warnings;
use MyPackage;
my $obj = MyPackage->new("John Smith");
my $name = $obj->some_instance_method(69);
print "name='$name'\n";
my $cm = MyPackage->some_class_method(42);
print "cm='$cm'\n";
my $um = MyPackage::some_utility_method(43);
print "um='$um'\n";