StringRegExp trouble

[tes5884]

Hi Guys,

I'm trying to write a script to check a rss feed if there is an update to Adobe or Firezilla. Trouble is, I cant wrap my brain around StringRegExp, how do I get only the version number so I can compare to my current version and see if it is up to date?

Thanks!

#include <IE.au3>
#include <Array.au3>
#include <CSV.au3>

$lst = "sources.csv"
$csv = _ParseCSV($lst, "", "", 1)



For $i = 0 To UBound($csv, 1) - 1

InetGet($csv[$i][0], "temp.xml")

$1 = FileRead("temp.xml")
$2 = StringRegExp($1, '', 3)


If FileExists($csv[$i][1] & ".txt") Then
If $2[2] > FileReadLine($csv[$i][1] & ".txt", -1) Then
$rslt = MsgBox(4, "", "Updates available! Do you want to be reminded again?")
If $rslt = 7 Then
FileWriteLine($csv[$i][1] & ".txt", $2[2])
EndIf
EndIf
Else
FileWrite($csv[$i][1] & ".txt", $2[2])
EndIf
FileDelete("temp.xml")

Next

Exit

Edited December 5, 2012 by tes5884

[jchd]

What exact input syntax do you have and what do you want to extract?

[tes5884]

What exact input syntax do you have and what do you want to extract?

example RSS source would be:

http://www.filehippo.com/download_adobe_reader/rss

I want to retrieve the new version number, compare to the list of current versions, if it doesnt exist here notify me about new version, otherwise exit.

[PhoenixXL]

try with _StringBetween or

Edited December 5, 2012 by PhoenixXL

[tes5884]

try with _StringBetween or

Thanks man! but I'm trying to learn how to use StringRegExp properly... Also, I'm trying to just get back the digits, no alpha.

Thanks

[jdelaney]

use XML DOM, or HTML DOM objects:

http://www.w3schools.com/dom/default.asp

some UDF's are out there too

[jchd]

I'd use:

$sVersion = StringRegExp($sXMLcontent, "(?i)<item>.*?<title>.*?(d+(?:.d+)*).*?</title>), 1)

then use StringSplit then Number to compare each component of both versions. A raw string compare won't work: '10.2.1' < '9.0.1'

[tes5884]

I'd use:

$sVersion = StringRegExp($sXMLcontent, "(?i)<item>.*?<title>.*?(d+(?:.d+)*).*?</title>), 1)

then use StringSplit then Number to compare each component of both versions. A raw string compare won't work: '10.2.1' < '9.0.1'

Scite doesnt like your StringRexExp...

[jchd]

$sVersion = StringRegExp($sXMLcontent, "(?i)<item>.*?<title>.*?(d+(?:.d+)*).*?</title>", 1)

Sorry for typo. I can't test right now but I hope it's fine.

[jdelaney]

I'm inferring the XPATH...feel free to update it as needed

$oXML=ObjCreate("Microsoft.XMLDOM")

$oXML.loadxml($string) ; load document...the string you read from the file...or use.xml(file)

$oItem = $oXML.selectSingleNode( '//item' )
$oTitle = $oXML.selectSingleNode( '//title' )

ConsoleWrite ($oItem.text & " " & $oTitle.text & @crlf )

update: weakness of regexp...what if there are 2 item's, and only the second includes a title? your regexp would match the first item, but the second title. dom objects are always consistent (when well formatted xpath included)

Edited December 5, 2012 by jdelaney

[jchd]

That's why I asked for the exact input syntax!

Anyway you're right in that XMLDOM is more reliable in the general case, but the poster insisted on a regexp.

[jdelaney]

I always see similar posts, and always try to open posters to DOM objects. Maybe they are unfamiliar, or don't know about them. It answers the question, just with a better answer (opinion) then actually asked for.

[tes5884]

I always see similar posts, and always try to open posters to DOM objects. Maybe they are unfamiliar, or don't know about them. It answers the question, just with a better answer (opinion) then actually asked for.

That's why I asked for the exact input syntax!

Anyway you're right in that XMLDOM is more reliable in the general case, but the poster insisted on a regexp.

I don't know what DOM objects are, hence my confusion.

My apologies..

Edited December 5, 2012 by tes5884

[jdelaney]

I provided a link with the basics of DOM objects. I suggest reading through it, if you are going to work with lots of xml files.

[PhoenixXL]

Example

#include <Array.au3>
$RSS = InetRead('http://www.filehippo.com/download_adobe_reader/rss')
$RSS = BinaryToString($RSS)

;Get the Text Between the Tag
$sTitle = TagBetween($RSS, 'title')

For $i = 0 To UBound($sTitle) - 1
$sVersion = Version($sTitle[$i])
ConsoleWrite('Index:' & $i & ' Version:' & $sVersion & @CR)
Next

_ArrayDisplay($sTitle)


Func TagBetween($sString, $sTag)
$aRet = StringRegExp($sString, "(?i)(?s)<" & $sTag & ">(.*?)</" & $sTag & ">", 3)
If @error Then Return SetError(@error, @extended, -1)
Return $aRet
EndFunc   ;==>TagBetween

Func Version($sString)
;Remove the Alphabets
$aRet = StringRegExpReplace($sString, "([^0-9.])*", '')
If @error Then Return SetError(@error, @extended, -1)
If $aRet = '' Then Return 0
Return $aRet
EndFunc   ;==>Version