StringRegExp

[Kiti]

Hello! I want to pull out the number "26", but it doesn't work:

$string = "Total 26"
$result = StringRegExp($string, '([/z][1-9](1,2})(?:Total )', 1)

If @error == 0 Then
    MsgBox(0, "", $result[0])
EndIf

I don't really know how to put a non-capturing group capture what it finds after the group. I've tried "[/z]" in the beginning but it doesn't solve the problem.

[oMBRa]

$string = "Total 26"
$result = StringRegExp($string, '(?:\b.*\b\s*)(\d+)', 1)

If @error == 0 Then
    MsgBox(0, "", $result[0])
EndIf

/Z matches at the end of the string, and why are you doing it from right to left?

[MrCreatoR]

Try this:

$sString = "Total 26"
$sResult = StringRegExpReplace($sString, '(?:Total )([1-9]{1,2})$', '\1')
If @extended > 0 Then MsgBox(0, "", $sResult)

And you have non matching brakets, i.e: (1,2}

[JackDinn]

for the question all you really need is to get the digits \d+

[Kiti]

Both examples are working if I try to pull out "26" only from the string "Total 26", but the point is that I have a larger text in clipboard and I want to pull "26" from all of it. This is the text:

What is bolded always remains the same. What is red changes everytime. I want to pull the underlined words which are: 26, Marvin,2:489:4, 88.812, 49.807 and 12.679.

For the last three numbers I've made a script and it works:

$string = clipget()

$asResult1 = StringRegExp($string, '([.0123456789]{1,7})(?: metal)', 1)

If @error == 0 Then
    MsgBox(0, "", $asResult1[0])
EndIf

$asResult2 = StringRegExp($string, '([.0123456789]{3,7})(?: cristal)', 1)
If @error == 0 Then
    MsgBox(0, "", $asResult2[0])
    EndIf
    
    $asResult3 = StringRegExp($string, '([.0123456789]{3,7})(?: deuteriu)', 1)
If @error == 0 Then
    MsgBox(0, "", $asResult3[0])
EndIf

But I still don't know how to pull "Marvin" and "2:489:4" because both are changeable and there is nothing else next to them apart from "Aparator" which stays fixed.

And the above two scripts are not working on that entire text

Edited June 14, 2009 by Kiti

[oMBRa]

try this:

#include <Array.au3>
$String = 'Aparator Marvin ([2:489:4])'
$a = StringRegExp($String, '(?:Aparator\s)(\b\w+\b)(?:\s\(\[)(.*?)(?:\]\))', 1)
_ArrayDisplay($a)

[Kiti]

try this:

#include <Array.au3>
 $String = 'Aparator Marvin ([2:489:4])'
 $a = StringRegExp($String, '(?:Aparator\s)(\b\w+\b)(?:\s\(\[)(.*?)(?:\]\))', 1)
 _ArrayDisplay($a)

It's working, thank you very much!

What about the "Total 26" thing?

And if you're not to busy right now, could you explain me what does the "(?:Aparator\s)(\b\w+\ (?:\s\(\[)(.*?)(?:\]\))" do? I really want to be able to make my own stringregexp match strings without getting them from the forum ^^

[oMBRa]

(?:Aparator\s)

"?:" means non capturing group, "\s" matches any whitespace character

(\b\w+\

"\b" matches at the beginnig or end of a word, "\w" matches any "word" character such as a,b,c, digits and underscore _

(?:\s\(\[)

it's another non capturing group that matches a whitespace character and "([", note that the backslash escape a special character so "\(" matches a round bracket, same for the square one

(.*?)

matches anything except newline ( but find the smallest match )

(?:\]\))

non capturing group that matches ")]" Edited June 14, 2009 by oMBRa

[Kiti]

Thank you a lot for the explanations! Now I managed to creat a search string to pull out the number "26" !

$String = clipget()
$nr = StringRegExp($String, '(?:Total\s)(\b\d+\B) ', 1)

My script is finally finished!

Edited June 14, 2009 by Kiti