# dateien die nicht durchsucht werden sollen
my @unwanted = qw(test.html index.html);

my @files = ();
find(\&find_files,$basedir);
@files = grep{ my $i = $_; !grep{ $_ eq $i }@unwanted }@files;
my ($includes) = search($params{terms},\@files,$basedir);
print_html($base_url,$template,$hp_title,$params{terms},$includes);