Changing the extensions of multiple files using Perl Regex?

[Davo1977]

Does anyone know a regular expression that will rename multiple files that have different extensions to have the same extension. For example, you could use this code when several text files exist in a directory but have slightly different extensions such as .txt,. TXT, or text. This expression should show how to rename them to all have .txt extensions.


I understand i will nedd [] the character class so it contains a hypen, dot, slash and w+ d+ to show the filename to be of any charcter and digit
What else do i need to include in the expression?

Regards, David.

[eWish]

If you want the match to be case-insensitive the you can use the i flag.

There are several perl docs that cover regular expression.
perlretut
perlrequick
perlfaq6
perlop

Also check out the perl section in the "Howtos" for some additional tutorials.

--Kevin

[KevinADC]

Does anyone know a regular expression that will rename multiple files that have different extensions to have the same extension. For example, you could use this code when several text files exist in a directory but have slightly different extensions such as .txt,. TXT, or text. This expression should show how to rename them to all have .txt extensions.


I understand i will nedd [] the character class so it contains a hypen, dot, slash and w+ d+ to show the filename to be of any charcter and digit
What else do i need to include in the expression?

Regards, David.

No doubt in my mind this is school or class work.

Regular expressions can not rename files, only find the files you are looking for. To rename a file you have to use the rename() function.

[eWish]

As Kevin has pointed out you will need the rename() function. In addition to that I would suggest using File::Find or File::Find::Wanted modules to located the files that you are after. I prefer the latter of the two.

--Kevin