Need perl script

[webdev]

I need a perl script for the following case. Input is a text file with the following content AB001. I need to replace the text with AB002 in a new file. This has to go on until AB999. ie., At the end there should be 999 files with the contents AB001,AB002... AB999 respectively. Please...