my $CF = new FileHandle "$cntrF", O_RDWR | O_APPEND || die '"cntrF' did not open $!\n";

##</code><code>##

my $CF = new FileHandle $cntrF, ( O_RDWR | O_APPEND || die "'cntrF' did not open $!\n" );

##</code><code>##

( my $CF = new FileHandle $cntrF, O_RDWR | O_APPEND ) || die "'cntrF' did not open $!\n";

##</code><code>##

my $CF = new FileHandle $cntrF, O_RDWR | O_APPEND or die "'cntrF' did not open $!\n";