{
my $cgi = $_->{'cgi'};
my $mod = $cgi->param('module');
my $module = '';
if($mod =~ /^(.*)$/) {
$module = $1;
}
require $module;
my $file = $INC{$module};
$file =~ s/\.pm$/\.pod/;
if(-f $file) {
`cd /tmp; /usr/bin/pod2html $file`;
} else {
"Error: Missing docs\n"
. " Error:
}
}