open(...) or die ".... $!"

##</code><code>##

   open (...) or { $errormsg = $!; $status = -1 }