On Mon, 3 Jun 2002, Walter Usyk wrote:

> I'm having a problem with a regular expression and I hope that someone
> can help me out with.
>
> I have the following:
>
> my $envLU
> ="/vobs/spifftest/.@@/HDX.LU/lineups/.@@/HDX.LU/hdx.lu@@/main/LATEST";
> $envLU   =~ s/^(.*\/)([^\/]+@@[^@@]+)$/$2/;
>
> What it is suppose to return is the string starting after the "/? before
> the last @@. That is
> "hdx.lu@@/main/LATEST"
>
> It does do this but I get errors below.
>
> When the reg expression get executed I start receiving the following
> errors and I do not know why.
>
> Bareword found where operator expected at (eval 740) line 6, near
> "/vobs/spifftest"
>         (Missing operator before pifftest?)
> Bareword found where operator expected at (eval 741) line 6, near
> "/vobs/spifftest"
>         (Missing operator before pifftest?)
> Bareword found where operator expected at (eval 743) line 6, near
> "/vobs/spifftest"
>         (Missing operator before pifftest?)
> Bareword found where operator expected at (eval 744) line 6, near
> "/vobs/spifftest"
>         (Missing operator before pifftest?)
> Bareword found where operator expected at (eval 745) line 6, near
> "/vobs/spifftest"
>         (Missing operator before pifftest?)
>
> And they just keep going on until I kill the application.
>
> Can any one tell me what the problem is?
>

Pehaps you should avail yourself the benefit of the -w flag so
you can see the warning about the @ character in a double quoted
string.

**** [EMAIL PROTECTED] <Carl Jolley>
**** All opinions are my own and not necessarily those of my employer ****


_______________________________________________
Perl-Win32-Users mailing list
[EMAIL PROTECTED]
To unsubscribe: http://listserv.ActiveState.com/mailman/mysubs

Reply via email to