Rename files with perl, files get deleted?

You have initialized $new_name once, outside your loop. Even though you update $i, you are not updating $new_name. Therefore every file gets renamed to picture1 (in the current directory), and all except for the last file is lost.

I cant really gove you an answer,but what I can give you is a way to a solution, that is you have to find the anglde that you relate to or peaks your interest. A good paper is one that people get drawn into because it reaches them ln some way.As for me WW11 to me, I think of the holocaust and the effect it had on the survivors, their families and those who stood by and did nothing until it was too late.