>960
open(FILEHANDLENAME, ">filename") || die "Can not open file for output:$!";

binmode(FILEHANDLENAME); # if you output binary data

print FILEHANDLENAME "hogehoge";

close(FILEHANDLENAME);