package MyModule;

sub something {
    my ($param) = @_;
    # do something here
}

1;

##</code><code>##

use MyModule;

use CGI;

# process something here...
my $result = process_something_here();

MyModule::something($result);

##</code><code>##

use MyModule;

use CGI;

# process other thing here...
my $result = process_other_thing_here();

MyModule::something($result);