opendir(DIR, "c:/$directory") ...
                ^