Chris, It did not work. I am getting the following error"
Can't locate lib.pm in @INC
(@INC contains: c:\h\coe\comp\perl\lib\site c:\h\coe \comp\perl\lib c:\perl\lib c:\perl\lib\site c:\perl\lib\site .)
at dir.pl line 3.
BEGIN failed--compilation aborted at dir.pl line 3."
my scripts as follow:

#!/h/COE/Comp/Perl/bin/perl

use lib `c:/h\COTS\Perl\lib`;
use File::Find;

find(\&wanted,'/h', '/h/COE' );

sub wanted{
     #-d $_ && print "$File::Find::name\n";
}
[download]

thanks

2003-04-16 edit by ybiC: <tt> for error message, <code> for script