[REBOL] Re: How to change a file extension ?

From: nitsch-lists:netcologne at: 13-Jan-2002 23:50

RE: [REBOL] How to change a file extension ?

Hi Patrick

foreach f read %./
[   either parse f [copy g to %.r thru %.r]
    [   g: join g %.bak    Print ["renaming" f "->" g]  ]
    [   print ["keeping" f] ]
]

; + quick double %.r workaround:

foreach f read %./
[   either parse f compose [copy g to (x: %.r) thru (x) ]
    [   g: join g %.bak    Print ["renaming" f "->" g]  ]
    [   print ["keeping" f] ]
]

-volker

[pat665--ifrance--com] wrote:

1 · 2 · 3 · 4 · [5] · 6 · 7 · 8 · 9 · See whole thread