(crazyinsomniac) Re: Perl/Tk Chatterbox Client

[crazyinsomniac]

Hi ya Shendal, y'all

I needed to make the following 'small' changes to your LaunchBrowser subroutine.
Here goes(my 100th post):

    eval '
        use Win32::Process;
        my $cmdline = "command.com";
        my $appname = "$ENV{WINBOOTDIR}/command.com";

        if(Win32::IsWinNT())
        {
            $cmdline = "cmd.exe";
            $appname = "$ENV{SYSTEMROOT}/system32/cmd.exe";
        }

        $cmdline .= " /c start $url";

        Win32::Process::Create($process,$appname,$cmdline,0,DETACHED_P
+ROCESS,".") || printError("Unable to launch browser: " . Win32::Forma
+tMessage(Win32::GetLastError()));
    ';
    }

"cRaZy is co01, but sometimes cRaZy is cRaZy".
                                                      - crazyinsomniac