... open dfile, "> $execf" or die $!; binmode dfile; print dfile $quell; close dfile; ...