# find all statements that have a PPI::Token::Word with "Mod::func" 
my $res = $Doc->find ( 
   sub {
              $_[1]->isa('PPI::Statement') 
                  and
                  $_[1]->contains('PPI::Token::Word')
              }
            );