Thanks Chas!
On windows side this seems to work
C:\>perl -MFile::Find -le "print 'ok'"
ok
and it seems that File::Find module is installed though ppm won't locate it
(ppm query File::Find). And I don't know why.
On mac's side I followed Chas's orders, but I can't get any output
~ > perl -MFile::Find -le 'print "ok"'
ok
~ > cat Print_directory_sizes.pl
#!/usr/bin/perl
use warnings;
use strict;
use File::Find;
my $dir = defined $ARGV[0] ? $ARGV[0] : '.';
my $size;
find( sub { -f and ( $size += -s _ ) }, $dir );
~ > perl Print_directory_sizes.pl
~ >
or
~ > perl Print_directory_sizes.pl Documents/
~ >
Do you know why?
-L
2009/3/3 Chas. Owens <[email protected]>
> On Tue, Mar 3, 2009 at 14:47, Lauri Nikkinen <[email protected]>
> wrote:
> > I uninstalled ActiveState Perl via Add/Remove Programs and installed it
> > (ActivePerl 5.10.0 Build 1004) again from here
> >
> > http://www.activestate.com/activeperl/
> >
> > and I got the same answer from ppm query File::Find. I don't know if it
> has
> > something to do with the Windows 'cause I'm running Windows XP via
> Parallels
> > Desktop (as a virtual computer) on my Macbook Pro. I haven't had any
> > difficulties with other programs.
> snip
>
> File::Find is part of Core Perl. If it weren't installed by
> Activestate's Perl installer many people would be up in arms. Try
> writing a simple script using it or saying
>
> perl -MFile::Find -le "print 'ok'"
>
> in cmd.exe.
>
> --
> Chas. Owens
> wonkden.net
> The most important skill a programmer can have is the ability to read.
>
