どうでもいいかもしれないが、
find(\&boobar, '.');
↑のように開始パスを相対パスで渡すと、サブディレクトリに入ったときに強制終了するんだよなぁ。
そんなわけで、use Cwd 'abs_path';のabs_path()で絶対パスに変換するなどしてから渡す必要がある。