#runme.pl use lib '.'; use ExampleClass; my $ec = ExampleClass->new; print $ec->does_work,"\n";