package My::Module;

sub new {
    # initialize stuff
    return bless {};
}

1;

package main;

use My::Module;

# handle parameters

my $my = My::Module->new;