not or ! ?

[Huub]

Hi,

I'm trying to use 'not' but it gives an error. So, can I do this or is
it too simple thought?

while !(/m\s/g) # While the character being read is no white space
{
...
}

Thank you,

Huub

 

[Scott Bryce]

Hi,

I'm trying to use 'not' but it gives an error. So, can I do this or
is it too simple thought?

while !(/m\s/g) # While the character being read is no white space {
... }

What happened when you tried it?

 

[Bob Walton]

Huub wrote:

....

I'm trying to use 'not' but it gives an error. So, can I do this or is
it too simple thought?

while !(/m\s/g) # While the character being read is no white space

Uh, if you mean what your comment says, you probably want

m/\s/g

as the regex you posted will match an "m" followed by a
whitespace character.

Also, the syntax for the while is incorrect. It is

while(expression){...}

Did you actually try compiling what you posted? It generates a
syntax error.

Even if all that is fixed, the special meaning of //g in a while
doesn't work with a ! in front of the regex (one gets either no
executions of the loop if one or more whitespace characters is
present, or an infinite loop if no whitespace character is
present). Maybe what you want is:

while(/[^\s]/g){...}

?

For example:

D:\junk>perl -e "$_='a b c';while(/[^\s]/g){print 'hi'}"
hihihi
D:\junk>

 

[Brian Wakem]

Maybe what you want is:

while(/[^\s]/g){...}

or even /\S/g

 

[Huub]

Huub wrote:

...



Uh, if you mean what your comment says, you probably want

m/\s/g

Yes..typo. Should type and read more carefully.

as the regex you posted will match an "m" followed by a whitespace
character.

Also, the syntax for the while is incorrect. It is

while(expression){...}

Yes, (!(m/\s/g)) compiles better.

Did you actually try compiling what you posted? It generates a syntax
error.
Yes.


Even if all that is fixed, the special meaning of //g in a while doesn't
work with a ! in front of the regex (one gets either no executions of
the loop if one or more whitespace characters is present, or an infinite
loop if no whitespace character is present). Maybe what you want is:

while(/[^\s]/g){...}

?

For example:

D:\junk>perl -e "$_='a b c';while(/[^\s]/g){print 'hi'}"
hihihi
D:\junk>

{
...
}
...

Huub

 

[Sherm Pendley]

Yes..typo. Should type and read more carefully.

No, should copy-and-paste.

sherm--

 

[John W. Krahn]

What happened when you tried it?

What happened when you read "but it gives an error"?


John

 

[Scott Bryce]

What happened when you read "but it gives an error"?

I understood that to mean that when he tries 'not' it gives an error. He
didn't tell us what happened when he tried while !(/m\s/g). He
asked us if he can do it. Well, he can try. Did I read that wrong?