Maybe slightly off-topic, but I assume you use a MS Windows environment. Wasn't (isn't) a DOS shell capable of doing something like this?

C:\Storage> rename *.csv *.txt
[download]

Perl is awesome, but sometimes a little shell command could be easier.

Then again, you seem to "extract some data from the file", and I bet Perl comes in handy there ;-)