sysopen(FH, $file, O_WRONLY | O_TRUNC | O_CREAT); print FH "Whooyah";