Re: [MacPerl] Parsing?

[mpeursem@knoware.nl (Maurice van Peursem)]

Hi,

Thai Nguyen <tng@mdcsc.ca.mdis.com> wrote:
>        I am writting a Perl(CGI) script that will automatically detect and
>route users according to the type of browser they are using, so that they
>will either get the enhanced page or the non-Netscape page.
>
>I am having trouble parsing the HTTP_USER_AGENT information.
>
>I have this:
>
># Define Variables
>$browser = $ENV{'HTTP_USER_AGENT'};
>
>#parse $browser
>$browser =~ s/\s.*//;
>($software, $version) = split (/\//, $browser, 2);
>($number ,$suffix) =~ split (/([^\d.].*)/, $version);
                     ^
You left a tilde here, that's why it doesn't work.

Maurice