#!/usr/bin/perl # Note: file written.txt must be in same directory, or else # must specify an absolute path open(TXT, ">>written.txt"); # open the file for writing print TXT "Add a line!\n"; # write an additional line close(TXT); # close file again