File::Find::find( sub { ... goto My::Package::FOUND ... } ... );
My::Package::FOUND:
    ....