my $dir = "c:\\temp\\";

For the benefit of any who might not know: You don't need to use backslashes when running on a Windows machine; Perl will do the right thing and convert a forward-slash path delimiter to the appropriate delimiter for whatever platform it's running on. That way you don't have to backslash escape your backslashes. You can just write:

my $dir = "c:/temp/";

which is just a little easier and less error prone, not to mention makes your programs a little less platform-specific. : )

Jon