use CGI;
use Mein::Modul;
my $cgi = CGI->new;
my $param = $cgi->param('key') || 'default';
if ($param eq 'gewuenschter wert') {
    Main::Modul::funktion(...);
}