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