Trim Right To RegEp

[Chimaera]

Hi all

Im trying to remove sme chars at the end of a address

e.g.

C:\Program Files (x86)\DAEMON Tools Lite\uninst.exe

$soft_path = RegRead($path_2, $StringSecond)
    $InstallLocation = StringTrimRight($soft_path, $CharRemove)

soft path is the example above and $CharRemove is just a number by counting the stuff to remove and adding the number to trim

I would like to automate it so it auto removes everything upto the last "\"

e.g.

C:\Program Files (x86)\DAEMON Tools Lite\uninst.exe

becomes

C:\Program Files (x86)\DAEMON Tools Lite\

So i started looking at stringrexep and omg talk about complicated...

im here atm but im lost

$InstallLocation = StringRegExp($soft_path,"\x\\")

Also for a different part of the script ive searched high and low for a snippet that i think GeoSoft posted that auto added a "\" if a line didnt have it at the end, can anyone point me in the direction of where that is please. Or to where a similar thing is.

Many thanks

Edited October 17, 2011 by Chimaera

[UEZ]

I'm not a RegEx expert but this seems to be working:

$soft_path = "C:\Program Files (x86)\DAEMON Tools Lite\uninst.exe"
$InstallLocation = StringRegExpReplace($soft_path, "^(.*)\\.*$", "$1")
ConsoleWrite('@@ Debug(' & @ScriptLineNumber & ') : $InstallLocation = ' & $InstallLocation & @crlf & '>Error code: ' & @error & @crlf) ;### Debug Console

Br,

UEZ

Edited October 17, 2011 by UEZ

[guinness]

Have a look at these OR in WinAPIEx.au3 look at _WinAPI_PathRemoveFileSpec()

Edit: In all my scripts I now use the _WinAPI_Path* functions to get extension, filename etc... Look here >>

Edited October 17, 2011 by guinness

[Chimaera]

$InstallLocation = StringRegExpReplace($soft_path, "^(.*)\\.*$", "$1")

This for me removes the trailing slash "\" , i need to leave the trailing slash in like my example

C:\Program Files (x86)\DAEMON Tools Lite\

Or Is it better coding practice to have the link without the trailing slash and add & "\" at the end if i need it, or always add it with the nxt section

also what does the $ do in this bit

"^(.*)\\.*$"

as i cant find it in the regexp help ?

Edited October 17, 2011 by Chimaera

[UEZ]

Use this instead:

$InstallLocation = StringRegExpReplace($soft_path, "^(.*)\\.*$", "$1\\")

^ means start of the string

$ means end of the string

Br,

UEZ

[Chimaera]

Thanks for that UEZ thats that one sorted

For the other one which is just to add a trailing slash to the end of it if the string is missing.

C:\Program Files\CCleaner\ <<< does nothing

C:\Program Files\CCleaner << adds "\" to the end

Ive got this from the examples from guinness and looking at what you gave me which adds the slash

$InstallLocation = StringRegExpReplace($soft_path, "^(.*).*$", "$1\\")

but it adds the slash even if the original has it

so how do i get it to work out if the "\" exists and then decided to add?

[guinness]

Look at or _WinAPI_PathAddBackslash()

[Chimaera]

Im trying not to use big stuff i don't understand like winapi but i can use that function to keep me ticking over till i figure other options

Or until i end up going a different path which happens often....

Thanks for the help all

[GEOSoft]

The one from UEZ should be giving you exactly what you asked for.

If it's not then you can try this for your replace expression.

^(.+[[:alnum:]\h])\\+.*$

Also remember that you can nest expressions. so if there is still a chance that it could mess up then (Using UEZs expression).

$InstallLocation = StringRegExpReplace(StringRegExpReplace($soft_path, "^(.*).*$", "$1\\"), "\\+", [url=""]\\[/url])

That should remove any multiple "\"s from the string.

[Chimaera]

Thanks for the help

The only issue ive come up against is

Im using this

$sInstallLocation = StringRegExpReplace($soft_path, "^(.*)\\.*$", "$1")

which is removing everything upto and including the last slash which is fine but..

Ive come across a few registry keys like this which it doesnt seem to like and i cant work out why?

"C:\Program Files (x86)\Universal Extractor\unins000.exe"

I think its the "" thats causing the problem, ive checked all the code upto that point and its all fine.

im still trying to find the problem but any suggestions to look at will be fine

Edited October 28, 2011 by Chimaera

[Malkey]

"\\" in a RegExp pattern will match an actual backslash character.

"( ... )" is a capturing group. Everything that matches within the brackets is captured and can be (back) referenced with "\1" or "$1" or "${1}".

Notice if "\\" is outside the captured group, the trailing backslash is missing.

If the "\\" is inside the captured group, the trailing backslash is present. The backslash has been captured.

Local $soft_path = "C:\Program Files (x86)\Universal Extractor\unins000.exe"

Local $sInstallLocation   = StringRegExpReplace($soft_path, "^(.*)\\.*$", "$1")
Local $sInstallLocationBS = StringRegExpReplace($soft_path, "^(.*\\).*$", "$1")

MsgBox(0, "Results", '"^(.*)\\.*$" ' & $sInstallLocation & @LF & '"^(.*\\).*$" ' & $sInstallLocationBS)

[Robjong]

Hi,

If you mean the the value you read from the registry includes the double quotes this should work

$soft_path = '"C:\Program Files (x86)\Universal Extractor\unins000.exe"'
$sInstallLocation = StringRegExpReplace($soft_path, "^['""]?(.*?)[^\\]*['""]?$", "$1") ; now includes the trailing backslash
ConsoleWrite("$sInstallLocation = " & $sInstallLocation & @CRLF)

Edit: small change to include single quotes

Edited October 28, 2011 by Robjong

[Chimaera]

Probably not explaining it right

The result i get from the registry is a uninstall string

"C:\Program Files (x86)\Universal Extractor\unins000.exe"

Which somehow messes up my code, ive tried a key without the "" and it works fine so im assuming its the "" that mess it up so i want to do a simple StringRegExpExplace to remove the " from each end

and end up with this

C:\Program Files (x86)\Universal Extractor\unins000.exe

i tried this but it doesnt seem to help

$sInstallLocation = StringRegExpReplace($soft_path, '^(.*)".*$', '$1')

This doesn't need to worry about the trailing slash at all as i don't think i can combine them now, so i will run this in a func to remove the "" prior to the other one

hmm

is this right?

StringRegExpReplace($soft_path, "^['""]?['""]?$", "$1")

Edited October 29, 2011 by Chimaera

[GEOSoft]

Is there something wrong with a simple StringReplace($sStr, '"', "") ?

The RegEx is best expressed as StringRegExpReplace($sStr, "^\x22?(.+)\x22?$", "$1")