I tried running this:

use strict;
use warnings;
use File::Find;

sub finda
{
    print "In finda, $File::Find::name\n";
}

sub findb
{
    print "In findb, $File::Find::name\n";
}

find (\&finda, "/abc/xyz");
find (\&findb, "/pqr");
[download]

and got this result:

In finda, /abc/xyz           # a folder
In finda, /abc/xyz/file1     # a file
In findb, /pqr               # a folder
In findb, /pqr/file2         # a file
[download]

This is what you expected (apart from the 2 folders)
So, as the snippets of code you provided behave as expected, you need to post your code before we can help further.

Update: I mean: post a minimal script that reproduces your problem.
(This is all covered in How do I post a question effectively? !)