Help for this page

Select Code to Download

Select or download this

sub DisplayHTML() {
    $HTMLFileName = @_[0];
    open(HTMLFNH,"<$HTMLFileName") || die "Cant open $HTMLFileName";
...
    close(HTMLFNH);
}
return 1;