Select Code to Download

    #Pod::Html::pod2html(@args);    
    my $p = Pod::Simple::HTML->new();
...
    $fn = substr ( $args[4], 9) ;
    $p->parse_file( $fn ) or die("can't open $fn to parse $!");
    close FH;

   #use Pod::Html qw( 1.04 ); 
   use Pod::Simple::Html;