Heya bgreg,

You've managed to capitalize the File in FILE::Find.

Try this instead:

use strict;
use warnings;
use File::Find;

... etc.
[download]

Oh and BTW, make sure you use strict too!

Welcome to Perl and Perlmonks!