open FILE, "+>", $filename or die $!;

##</code><code>##

      open FILE, '>>', $filename or die $!;