You might also want to check out the -i flag on perl. While I know you said 'creating a file through perl' it would seem that -i might be worth knowing.

-i[extension]   edit <> files in place (makes backup if extension supp
+lied)
[download]