Perl File Handling - Writing & Appending into a File
How to Write into a File in Perl programming?
Explanation
To write data into a file only if the "access mode" for the file should be in write or read/write modes. The access modes to write into a file can be among the following ">, +>,+<".
#! C:programfilesperlbinperl
print "content-type: text/htmlnn";
open(HANDLE,"+>file1.txt")or die "can't open file:$!";
print HANDLE "HScripts!";
close(HANDLE);
HScripts!
In the above example we open "file1.txt" in the write mode, along with a "die" statement to display error if the file doesn't have the "write" permission. A string is printed into the file, then the handle is closed. When the "file1.txt" is opened it will have the text "Hscripts!" printed into the file.
To write data to an existing file, one can open the file to which data need to updated in the append mode ">>", then can append the required data.
#! C:programfilesperlbinperl
print "content-type: text/htmlnn";
open(HANDLE,">>file1.txt")or die "can't open file:$!";
print HANDLE "HScripts is gone!";
close(HANDLE);
HScripts!HScripts is gone!
In the above example the file "file1.txt" already has the text "Hscripts!", make sure file1.txt is saved and closed. Now we open the same file in the append mode ">>" then the text "Hscripts is gone!" is printed into the file.
Example :
#! C:programfilesperlbinperl
print "content-type: text/htmlnn";
open(HANDLE,"+>file1.txt")or die "can't open file:$!";
print HANDLE "HScripts!";
close(HANDLE);
Result in "file1.txt":
HScripts!
In the above example we open "file1.txt" in the write mode, along with a "die" statement to display error if the file doesn't have the "write" permission. A string is printed into the file, then the handle is closed. When the "file1.txt" is opened it will have the text "Hscripts!" printed into the file.
Appending a file:
To write data to an existing file, one can open the file to which data need to updated in the append mode ">>", then can append the required data.
Example :
#! C:programfilesperlbinperl
print "content-type: text/htmlnn";
open(HANDLE,">>file1.txt")or die "can't open file:$!";
print HANDLE "HScripts is gone!";
close(HANDLE);
Result as in "file1.txt":
HScripts!HScripts is gone!
In the above example the file "file1.txt" already has the text "Hscripts!", make sure file1.txt is saved and closed. Now we open the same file in the append mode ">>" then the text "Hscripts is gone!" is printed into the file.
