I don't think you want to use find::recurse if I read the module correctly. It seems to return a hash of filenames, based on your criteria. Maybe I'm looking at a different recurse?
I get accurate results by using File::Find.

use strict;
use File::Find;

my $size = "0";

find(\&sizedir, "k:/node1");
print "$size\n";
exit;

sub sizedir {
    shift;
    $size += -s "$_";
}
[download]

Hope that helps. By the way, "k:/node1" & "k:\\node1" work for ActivePerl.
"k:\node1" checks out as:
k:
ode1