find(
    sub {
          ##code here;
        },
        @INC,
);


##</code><code>##

find{ wanted => sub { ##### code ;}, no_chdir => 1,}, $incl_dir;