closedir(DIR) || die "Couldn't close directory './Data': $!";

OR:

closedir DIR or die "Couldn't close directory './Data': $!";