[Cascavel-pm] Módulo Tie::DiskUsage no FreeBSD 6.2 RC1

Murilo Opsfelder Araújo mopsfelder em gmail.com
Terça Dezembro 12 05:01:12 PST 2006


Olá pessoal,

Estou tentando usar o módulo Tie::DiskUsage mas quando executo meu
programa example.pl dá o seguinte erro:

$ ./example.pl
Can't locate Tie/DiskUsage.pm in @INC (@INC contains:
/usr/local/lib/perl5/5.8.8/BSDPAN
/usr/local/lib/perl5/site_perl/5.8.8/mach
/usr/local/lib/perl5/site_perl/5.8.8 /usr/local/lib/perl5/site_perl
/usr/local/lib/perl5/5.8.8/mach /usr/local/lib/perl5/5.8.8 .) at
./example.pl line 3.
BEGIN failed--compilation aborted at ./example.pl line 3.
Exit 2

Pelo erro pude perceber que o módulo Tie::DiskUsage não está instalado.
Eu não sabia se instalava o módulo pela CPAN ou pelo ports tree,
instalei-o pelo ports: /usr/ports/devel/p5-Tie-Simple e
/usr/ports/sysutils/p5-Filesys-DiskUsage. Instalei os módulos
corretos?

O problema é que mesmo depois de instalar esses módulos pelo ports, o
erro acima ainda persiste.

Eu segui o seguinte link:
http://search.cpan.org/~schubiger/Tie-DiskUsage-0.15/lib/Tie/DiskUsage.pm

O meu program está igual ao mostrado no link anterior:
<code>
1 #!/usr/local/bin/perl -w
2
3 use Tie::DiskUsage;
4
5 tie %usage, 'Tie::DiskUsage', '/var', '-h';
6 print $usage{'/var/log'};
7 untie $usage;
</code>

Estou usando o perl 5.8.8 no FreeBSD 6.2 RC1.

Qualquer ajuda é bem-vinda.

Muito obrigado.


Mais detalhes sobre a lista de discussão Cascavel-pm