opendir DIR, $dir or die $!;

##</code><code>##

(opendir DIR, $dir) || die $!;