The lazy way would be to tie up STDOUT e.g

use IO::Scalar;

tie *STDOUT, 'IO::Scalar' => \my $stdout;

find( \&fetcher, "/directory"  );

untie *STDOUT;

print "\n\nTotal Count = $ct\n\n";
print $stdout;
[download]

Or you could change your code to build up the output then display the accumulated output after the total count. See. IO::Scalar for more info on the hack above.
HTH

_________
broquaint