open (OUTFILE, "<$dirContent");

##</code><code>##

open (OUTFILE, ">$dirContent");

##</code><code>##

perl -p -i.bak -e '/oldstring/newstring/'