11 lines
161 B
Perl
11 lines
161 B
Perl
|
|
||
|
|
open (FILEHANDLE, ">data.txt")
|
||
|
|
or die ("Cannot open data.txt");
|
||
|
|
|
||
|
|
binmode FILEHANDLE;
|
||
|
|
|
||
|
|
print FILEHANDLE "Hello\nthere!";
|
||
|
|
|
||
|
|
close (FILEHANDLE);
|
||
|
|
|
||
|
|
|