use Fcntl qw(O_RDWR O_CREAT);
sysopen(TEMP,"external_file.txt.tmp",O_RDWR|O_CREAT,755);