$newfile = "0001";  # Initialize to 0001
++$newfile;         # Now contains 0002