I am not sure... but your map is extremely extraneous, I'm not sure if it is the problem, but try to change your grep line to...

my $numfiles = grep { -T "$config{'basepath'}$key/$_" } readdir DIR;
[download]

you also do not need the explicit scalar call

Update oh yes.. I missed the =+.... VSarkiss++

                - Ant
                - Some of my best work - Fish Dinner