use Blah;
sub new{...}
sub doSomething{ 
    my $foobar = shift;
    $foobar->someMethod(); 
    ...
}
...