sub start_html {
    my @browsers = qw(firefox mozilla netscape galeon konqueror);
        foreach (@browsers) {
        if (-f "\/usr\/bin\/$_") {
            system ("$_ $installpath\/help\/HelpFile.htm");
            last;
        }
    }
 }