in reply to Write contents of a file, whilst reading from another file

Do you mean to copy the file ? or tell why copying doesn't work here. 
use File::Copy;
copy($old_file,$new_file);

[download]

artist

In Section Seekers of Perl Wisdom