You are right jdporter this is a typo ( in fact, a modification done for some obscure testing that I didn't revert correctly). I am correcting the post. I will also take a look at your proposal for improvement.

Regarding the usage of File::Split, I have some concerns for two reasons:

• I want to keep control on the resulting files names
• I am using the less possible number of CPAN packages, as a lot of my scripts are running on my team mates PC, and they just have the "basic" Perl installation. The only additional package required for the moment is Tk to have some GUIs.