If I add

use strict;
use warnings;
[download]

the error is obvious

$ perl junk852728.pl
syntax error at junk852728.pl line 9, near "$dir }"
Global symbol "$dir" requires explicit package name at junk852728.pl l
+ine 14.
Global symbol "$dir" requires explicit package name at junk852728.pl l
+ine 16.
Unmatched right curly bracket at junk852728.pl line 18, at end of line
syntax error at junk852728.pl line 18, near "}"
Execution of junk852728.pl aborted due to compilation errors.
[download]

} is not the same as )

-eval { find( \&wanted, $dir }; };
+eval { find( \&wanted, $dir ); };
[download]