[Cascavel-pm] Verificar tamanho arquivo

[Ednardo Lobo]

Patty,

Use "$dir/$file" ao invés de apenas "$file".

;-)


Patty Silva escreveu:
> Olá Pessoal,
> Uma dúvida boba que surgiu e que não está funcionando.
> Estou lendo um diretorio no qual tentei usar o next if para nao pegar os 
> arquivos vazios.
> Só que nao esta funcionando. Alguem saberia me dizer o pq??
> 
> 
> opendir(DIR, $dir) or die "Erro ao tentar acessar o diretorio:$!";
> 
> foreach my $file (sort(readdir DIR))
> {
> 
> 
>         if(-z $file)    {print "File is empty!\n";} --------> Nao funcionou
> 
>         next if $file eq '.' or $file eq '..' or ($file !~ /\.log$/ ) or 
> -z $file;  ----------> tb nao funcionou...
> ...........
> 
> 
> 
> Obrigada

-- 
     Ednardo Lobo

     www.lobo.eti.br