perl  -MFile::Find   -E '

$wanted->{postprocess}=sub{say $File::Find::dir and say `make` if -e "Makefile"};

$wanted->{wanted}=sub{EMPTY};

find $wanted, "/"

'

perl -MFile::Find -le '

$wanted->{wanted}
    = sub {};

$wanted->{postprocess}
    = sub {
            open STDIN, "Makefile" or return;
            print $File::Find::dir;
            while(<>) { print if 1..10 }

      };          

find $wanted, "/home";

'