I have a Tk app and I'm trying to launch the local Browser on Linux/Solaris for the help files. I'm using the following snippet but it isn't that effieicent because it doesn't detect non usr/bin installs.
sub start_html {
my @browsers = qw(firefox mozilla netscape galeon konqueror);
foreach (@browsers) {
if (-f "\/usr\/bin\/$_") {
system ("$_ $installpath\/help\/HelpFile.htm");
last;
}
}
}
Does anyone have any ideas how I could make this more flexible. I could obviously look in /usr/local/bin, /usr, or /firefox , /mozilla, etc. but this seems crazy.
Thanks