}
$refer =~ /.*koha\/(.*)\.pl.*/;
my $from = "modules/help/$1.tmpl";
my $file = $1;
$file =~ s/[^a-zA-Z0-9_\-\/]*//g;
my $from = "modules/help/$file.tmpl";
my $template = gethelptemplate( $from, "intranet" );
-