I'm not sure what you mean by "all at once." As others have pointed out, you can use sysopen() but you have to concern yourself with the process umask when you do. It's probably better just to open the file, write it, close it, and then set the permissions with Perl's chmod() function.

-sauoq
"My two cents aren't worth a dime.";