programming-examples/perl/File/To open a file for reading and writing.pl

open(FH, "+<filename");    # Opens "filename" for read, then write.
open(FH, "+>filename");    # Opens "filename" for write, then read.