# a subtle bug...
open THEFILE, ">/somedir/somefile" ||
   die "Could not create /somedir/somefile - $!\n"