Use File::find

Package File;

sub find { .. }