...
my $q = CGI->new;

my %modules = (
  simple => 'Filter::Simple',
  hard   => 'Filter::Util::Call'
);

my $filter = $q->param("filter");
if(exists $modules{$filter}) {
    eval "require $modules{$filter}";
}
...