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