Write data to file : file write « File « Perl






Write data to file

    

!#c:\perl\bin

print "Content-type: text/html\n\n";

@linestring = ("line 1\n",
               "line 2\n");

open(MYFILE, ">c:\\outfile.dat") || die print "Error encountered opening file ... $!";

for($i = 0; $i < 5; $i++)
{
    $thisline = $linestring[$i];
    print MYFILE "$thisline";
}

close(MYFILE);

print "Data has been written ..."

   
    
    
    
  








Related examples in the same category

1.Write array to a file
2.Write ten lines of text to a pipe
3.Write unpack data to a file
4.Writes to the standard error file.
5.Save formatted data to a file
6.Save hash value to a file
7.Save new line character to a file
8.Save packed data to a file
9.Print data to a file
10.Copying files
11.File read and write
12.Merges two files.
13.Shuffle a file?
14.Sort a file
15.Creating a file with the numbers 0-9: +>