Some help with regex

-T- · Post by **-T-** » Sat Jul 08, 2006 8:21 pm

This is my first go at tcl, so bear with me.

I'm having some problems with a regex function. If someone could take a look at it for me, I would be gratefull

The code is kind of long, so I won't paste it here. Take a look at pastebin for it

http://pastebin.ca/82855

Thanks again

Post by **Sir_Fz** » Sun Jul 09, 2006 5:20 am

What is the problem? nobody's going to look it up for you.

-T- · Post by **-T-** » Sun Jul 09, 2006 11:30 am

there is a problem with the regex I think. It doesn't give me any errors, but it does not do anything even though I know the line of text matches the regex pattern

Alchera · Post by **Alchera** » Sun Jul 09, 2006 8:44 pm

Code: Select all

if {regexp {.*(Wb|wB|wb|WB|GREETINGS|...)(!!| )?(\(|\*).*\)?(!!| )?(Wb|wB|wb|WB|FECKER|... remember this?|\|\|\|).*} $txt == 1} { ... }

FYI

-T- · Post by **-T-** » Sun Jul 09, 2006 9:18 pm

hmm, I don't see a difference in that code and the one I have myself

Alchera · Post by **Alchera** » Sun Jul 09, 2006 10:38 pm

-T- wrote:hmm, I don't see a difference in that code and the one I have myself

There isn't. I pasted it for the information of others. I am not an expert regexp person but at first glance that looks like it would never function.

-T- · Post by **-T-** » Mon Jul 10, 2006 10:02 am

the pattern work in my mirc script. Unless the tcl regex engine is very different from the on used in mirc, it should work

Alchera · Post by **Alchera** » Mon Jul 10, 2006 10:19 am

Tcl (Tool Command Language) is a different animal to any mIRC "script".

I suggest you read Tcl Built-In Commands - regexp manual page.

rosc2112 · Post by **rosc2112** » Sun Jul 16, 2006 4:20 pm

tcl's regex uses | to *concatenate* strings, not OR them..Maybe that's your problem? It also uses () to capture a segment for reporting... And there's also a -nocase option, so you don't need to search for various cases of "WB"

metroid · Post by **metroid** » Tue Jul 18, 2006 1:25 am

Code: Select all

% regexp {moo|m00|m0o} moo
1
% regexp {moo|m00|m0o} mo0
0
% regexp {moo|m00|m0o} m0o
1
% regexp {moo|m00|m0o} m00
1

are you sure about your previous statement rosc2112?

rosc2112 · Post by **rosc2112** » Tue Jul 18, 2006 2:47 pm

Just going by the docs and my own observations:

An ARE is one or more branches, separated by `|', matching anything that matches any of the branches.

A branch is zero or more constraints or quantified atoms, concatenated. It matches a match for the first, followed by a match for the second, etc; an empty branch matches the empty string.