opendir(DIR,$directory_to_check) || die "cannot open directory $directory_to_check: $!";