You can do that with the standard open() call and print:

     my ($file) = 'thefilename.txt';
     open (FILE, ">$file") || die "Could not write to $file\n";
     print FILE $stuff;
     close (FILE);
[download]

The > in the open call means to open for writing. You can create it empty, too, by not writing anything.