Tach,
Z.B. mit IO::File
open( FILENAME [,MODE [,PERMS]] )
was dann intern https://forum.selfhtml.org/?t=212013&m=1447535 ausführt; hinzu kommt übrigens noch, auch das, was du dort übergibst, wird erst noch mit der umask verundet, im konkreten Fall nicht schlimm, weil die umask zu klein ist.
mfg
Woodfighter