File Perl

  1. Home
  2. Perl
  3. File
  4. Print data to a file
!#c:\perl\bin
print "Content-type: text/html\n\n";
$thisline = "asdf 9045";
open(MYFILE, ">c:/personnel.dat")|| die print "Error encountered opening file ... $!";
print MYFILE "$thisline";
close(MYFILE);
print "Data has been written ..."