Opposite of FileWritetoLine??

[czardas]

(?s) . the dot matches anything including new lines.

[PhoenixXL]

@Water

It's called "lookbehind assertion" and can be found here.

I guess we can't add quantifiers to a look-behind. Logic : The Regex doesn't know how many it has to go back to get the result. Hence the Look-Behind should be of a specific width or else it would fail at least in PCRE.

@kylomas

I don't get how the regexp deletes the entire lines containing the start and end delimiters. Can you explain? (and again...thank you for your patience...)

Sure. Hold a while

[water]

I have to admit that I didn't get it too. The term "lookbehind assertion" came to my mind because I once had a problem that was solved by another user wioth lookbehind assertion.

The string processing I have to do can be done with the builtin functions of AutoIt. And it has the advantage that I can still read and understand my code in two years

[kylomas]

@water - Shit, I thought I was the only one!

[water]

I fear we are a huge community

As soon as I find a lot of spare time (aka as soon as I have retired) I will try to understand regular expressions and might be able to leave this community

[PhoenixXL]

Here it is

Local $sRead ;Through FileRead
$sRead = "line 0 Something Here" & @CRLF & _
"line 1 this is the start" & @CRLF & _
"line 2 Another Line..." & @CRLF & _
"line 3 Some Other Data End after terminator token " & @CRLF & _ ; or $sRead = FileRead( "FileName.ext" )
"line 4 Some Other Data after deleted line" ; or $sRead = FileRead( "FileName.ext" )
Local $sText = StringRegExpReplace($sRead, "(?i)(.*?Start)(?s:.*?End)(.*\n)", '')
MsgBox(64, "Return:", $sText) ; or FileWrite( "FileName.ext", $sText )

#cs - Pattern Decode -
(?i) Make searches Case-Insensitive so that "Start" also matches "start".
(.*?Start)
| .*? - Match anything other than a line feed(\n) [lazy quantifier]
| Start - Match the literal "Start"
(?s:.*?End)
| ?s: - Make this group non-capturing and activate (?s) modifier for this group only.
| .*? - Match everything(including \n) [lazy quantifier] till the literal "End"
(.*\n)
| .* - Match anything that is not a line-feed
| \n - Match the line-feed ( so that we don't get a blank line ).
#ce -Pattern Decode -

;Finally replace everything matched to none..

Please ask if you don't get anything

As soon as I find a lot of spare time (aka as soon as I have retired) I will try to understand regular expressions and might be able to leave this community

Its very ease, literally. Only a little bit of practice is required. You can achieve it in a week.

Regards

Edited March 20, 2013 by PhoenixXL

[kylomas]

PhoenixXL,

Why do you make the second group non-capturing?

kylomas

[PhoenixXL]

We can easily add modifiers in a non-capturing group as you saw.

Otherwise this would be the pattern with "On" and "Off" of the modifier

(?i)(.*?Start)(?s)(.*?End)(?-s)(.*n)

In a replace the non-capturing groups have the role only in back-referencing,

and since here we don't require it, we no need to bother about the capturing and non-capturing groups

Edited March 20, 2013 by PhoenixXL

[kylomas]

You can't do this:

(?i)(.*?Start)(?s.*?End)(.*n) - making the '.' match anything for just that group?

kylomas

edit: jut tried it and it does not work but don't undertand why...

Edited March 20, 2013 by kylomas

[PhoenixXL]

Yes

(?s.*?End) - here "." matches everything

[FireFox]

Seems like the OP is already lost muttley no reply from him.

[BrewManNH]

@BrewmanNH there's errors in your last post.

You were right, too much cutting and pasting. I have corrected it.

[wisem2540]

Seems like the OP is already lost muttley no reply from him.

Well there is certainly more replies here than I expected. I was sleeping.

So here is the one I chose to try.

Local $sRead = FileRead( "FileName.txt" )

Local $sText = StringRegExpReplace($sRead, "(?i)(.*?Start)(?s:.*?End)(.*\n)", '')

MsgBox(64, "Return:", $sText) ; or FileWrite( "FileName.ext", $sText )

I created a file, FileName.txt like this...

no

no

no

START

delete

delete

delete

END

Ran the script and it did not work. I am looking through some other examples to see if I can figure out why.

The msgbox comes up with the original txt file...nothing deleted

Edited March 20, 2013 by wisem2540

[wisem2540]

expandcollapse popup

#include 

#include 





Global $HostFile = "C:\WINDOWS\system32\drivers\etc\hosts"





Local $OldHost

If Not _FileReadToArray($HostFile, $OldHost) Then

MsgBox(4096, "Error", " Error reading log to Array error:" & @error)

Exit

EndIf



$index1 = _ArraySearch($OldHost, "plazaentries", 0, 0, 0, 1)

$index2 = _ArraySearch($OldHost, "endplazaentries", 0, 0, 0, 1)





If $index1 = -1 Then $plazaEntries = 0



If $index1 <> -1 Then $plazaEntries = 1





If $PlazaEntries = 0 Then Call ("NotFound")

If $PlazaEntries = 1 Then Call ("Found")





Func NotFound()



MsgBox(0, "Error","No Plaza Entries Found...importing to end of file.")





Local $NewHost = FileOpen($HostFile, 1)

Local $ServerHosts



If Not _FileReadToArray("ServerHosts.txt", $ServerHosts) Then

MsgBox(4096, "Error", " Error reading log to Array error:" & @error)

Exit

EndIf





; Check if file opened for reading OK

If $NewHost = -1 Then

MsgBox(0, "Error", "Unable to open file.")

Exit

EndIf



For $x = 1 To $ServerHosts[0]

FileWriteLine ($NewHost, $ServerHosts[$x])



Next

EndFunc



Func Found()



MsgBox(0, "Info","Entries for plaza found in host file " & @CRLF & "Cleaning up")



for $i = $index2 to $index1 Step -1

_ArrayDelete($OldHost, $i)

next







_FileWriteFromArray ($HostFile, $oldhost)







EndFunc

_ArrayDisplay ($oldhost)



$Done = MsgBox(4, "Done", "Would you like to view the Host File?")

If $Done = 6 Then Runwait ("Notepad.exe " & $Hostfile)

Here is some code i got almost working last night. I know its a mess. The only thing that is puzzling, is that it will add a value at the top of the host file and I dont know why.

[wisem2540]

Actually it looks like the value its putting at the top = the number of lines in the array. Is that normal?

EDIT

I changed my write line to _FileWriteFromArray ($HostFile, $oldhost, 1), to start at line1, and it seems to work.

Edited March 20, 2013 by wisem2540

[BrewManNH]

Is it putting that number in the file, or is it in the _ArrayDisplay, because if it's in the _ArrayDisplay, it's normal.

Try using #requireadmin, you can't write to that file without having admin credentials (on Vista/7/8)

[czardas]

You were right, too much cutting and pasting. I have corrected it.

Easily done.

[PhoenixXL]

Ran the script and it did not work. I am looking through some other examples to see if I can figure out why.

Some more to figure out. Can you please post the data of your file out here, so I could check why it didn't ran..

Regards

[wisem2540]

Here ya go. Just change one to #START and the other to #END

#PLAZAENTRIES

10.51.90.2 bjplaza01c01a.clin.bjc.org

10.51.90.3 bjplaza01c01b.clin.bjc.org

10.51.90.9 bjplaza01a01.clin.bjc.org

10.51.90.10 bjplaza01a02.clin.bjc.org

10.51.90.11 bjplaza01a03.clin.bjc.org

10.51.90.12 bjplaza01a04.clin.bjc.org

10.51.90.13 bjplaza01a05.clin.bjc.org

10.51.90.14 bjplaza01a06.clin.bjc.org

10.51.90.16 bjplaza01w01.clin.bjc.org

10.51.90.17 bjplaza01w02.clin.bjc.org

10.51.90.43 bjplaza01w03.clin.bjc.org

10.51.90.44 bjplaza01w04.clin.bjc.org

10.51.90.5 bjplazacsql.clin.bjc.org

10.51.90.4 bjplazacmgr.clin.bjc.org

10.51.90.7 OPENLink.clin.bjc.org

10.51.90.2 bjplaza01c01a

10.51.90.3 bjplaza01c01b

10.51.90.9 bjplaza01a01

10.51.90.10 bjplaza01a02

10.51.90.11 bjplaza01a03

10.51.90.12 bjplaza01a04

10.51.90.13 bjplaza01a05

10.51.90.14 bjplaza01a06

10.51.90.16 bjplaza01w01

10.51.90.17 bjplaza01w02

10.51.90.43 bjplaza01w03

10.51.90.44 bjplaza01w04

10.50.141.8 BJC_DR_ARCHIVE

10.51.90.5 bjplazacsql

10.51.90.4 bjplazacmgr

10.51.90.7 OPENLink

10.51.90.6 bjplzspan

10.40.8.7 bjris

10.33.162.2 bigben

10.33.162.32 relay1

10.35.141.213 mv301

10.35.141.212 gearviewqc

#ENDPLAZAENTRIES

Edited March 20, 2013 by wisem2540

[wisem2540]

Is it putting that number in the file, or is it in the _ArrayDisplay, because if it's in the _ArrayDisplay, it's normal.

Try using #requireadmin, you can't write to that file without having admin credentials (on Vista/7/8)

Good catch. I have made that adjustment and all is working with the above messy code I posted.

Edited March 20, 2013 by wisem2540