##
sub string2Html {
my ($htmlfilename, $podtext) = @_;
### some code that causes pod2html to read from scalar \$podtext;
### when it wants to read from STDIN
Pod::Html::pod2html "--outfile $htmlfilename";
### code to wrap up
}