sub new_data_file {
open(NEWFILE,">$basedir/$username/data.txt") | | die $!;
print NEWFILE "0\n";
close(NEWFILE);
}
How can I get the above to CHMOD data.txt 777? What coding do I need to add?
open(NEWFILE,">$basedir/$username/data.txt") | | die $!;
print NEWFILE "0\n";
close(NEWFILE);
}
How can I get the above to CHMOD data.txt 777? What coding do I need to add?