USING MODULES

Anonymous Monk has asked for the wisdom of the Perl Monks concerning the following question:

Great perlmonks, I have a problem. I have this code (below) that works on my local maching without a problem. I installed perl, with the same libraries and everything, on another computer. I moved the script over to the new computer to find that the script can't find the "find.pl". I think that I tried everything to make it work. I am confused because it worked fine on my computer. Can anyone help.

-w;
require 'c:\perl\lib\find.pl';
use File::find;
find(\&wanted, 'c:\perlpractice');
sub wanted {
    
my $filename = "$File::Find::name"; 
    $file = $filename;
     if (-M $file >= 3){    
        unlink $file; 
        $count++;
}
}

$count = '0' if $count == "0 ";
print "$count files were successfully deleted.";
[download]

Comment on USING MODULES Download Code

Replies are listed 'Best First'.
Re: USING MODULES by young perlhopper (Scribe) on Aug 05, 2000 at 01:26 UTC
I only ask this because you didn't make it explicit in your original post, but... You did check that find.pl really does exist on the second computer, right? If so, I'm at a loss. Sorry if this is less than helpful. Good Luck, Mark	[reply]
Re: USING MODULES by davorg (Chancellor) on Aug 05, 2000 at 02:53 UTC
Doesn't actually look to me as tho' your script is using anything from the find.pl file. Have you tried commenting that line out? -- <http://www.dave.org.uk> European Perl Conference - Sept 22/24 2000, ICA, London <http://www.yapc.org/Europe/>	[reply]
Re: USING MODULES by maverick (Curate) on Aug 05, 2000 at 01:23 UTC
Works on one windows box but not another? I'm assuming it is a compilation error? Check the path in your require. Make sure you have File::find. Are there different versions of Perl on the machines? /\/\averick	[reply]