Removing quotes

[garry r fisher]

Hi,

All you regexp/sub experts I need some help.

I have a file that contains a filename in quoted text i.e. “fred.csv”. When I try and open this in my Tcl script it complains because Tcl is trying to open “”fred.csv””.

                       set ofh [open $fname w]

So how do I remove the double quotes so I get fred rather than “fred”?

Thanks

Garry

Topic

[Rob Abbott]

Code:

regsub -all — “”” $data “”

Rob Abbott
Cloverleaf Emeritus

[Kevin Kinnell]

Or (as Charlie would point out except I beat him to the punch, nyah!)

you could use

   string map {{“} {}} $filenamestring

–kk

[Kevin Kinnell]

Whups, Mr. Abbot*:

regsub -all {“} $data {} data

(or wherever you decide to put the result.)

–kevin (won’t y’all be glad when they make me start doing something productive again?) kinnell

* always be respectful to guys with “VP” in their title.

[garry r fisher]

Thanks for those.

I spent quite a while trying to do these in both regsub and string map without success so I though it best to shout help.

This is what I like about the Cloverleaf community.

Thanks again.

Garry

[Max Drown (Infor)]

Kevin Kinnell wrote:

Or (as Charlie would point out except I beat him to the punch, nyah!)

you could use

   string map {{“} {}} $filenamestring

–kk

I was totally trying to beat Charlie to it, too, but I could not for the life of me figure out how to make it work with string map.  😯 Nested bracers! Never would have thought of that.

Maybe a prettier way with regsub could be like this:

Code:

regsub -all {”} $data {} data

-- Max Drown (Infor)

[Author]

Replies