open OUT, $out || die "Can't open $out!\n";

##</code><code>##

open( OUT, $out ) || die "Can't open $out: $!\n";