print OUT "$1\n" or die "Couldn't print to OUT at line __LINE__:\n$!\n";

##</code><code>##

Couldn't print to OUT at line 23:
Bad file descriptor

##</code><code>##

print() on closed filehandle OUT at line 23.