print MYFILE "IniFile=f:\\vaa\\basis\\vaa01.ini";

##</code><code>##

use File::Copy
copy('c:/temp/test.txt, 'c:/temp/test.txt.orig');