Tilt that backslash over.

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

As is, you're quoting '$'.

For extra credit, explain what, if anything, this has to do with CGI.pm