[REBOL] Re: How to change a file extension ?
From: al:bri:xtra at: 14-Jan-2002 8:47
Patrick Philipotwrote:
> How to change a file extension ?
> Example:
> Changing from %program.r to %program.bak
CD: :change-dir
LD: :list-dir
MD: :make-dir
WD: :what-dir
Directory?: func [File [file!]][#"/" = last File]
Filename: func [File [file!]][copy/part File find/last File "."]
Extension: func [File [file!] Extension [file!]][
join Filename File Extension
]
>> extension %program.r %.bak
== %program.bak
Andrew Martin
ICQ: 26227169 http://valley.150m.com/
