Só uma pergunta, porque você preenche @diretorio se não o usa depois ?<br><br>[]s<br>Wendel<br><br><div class="gmail_quote">On Jan 4, 2008 9:37 AM, Rafael Lebrao Martins <<a href="mailto:rafamv1@ig.com.br">rafamv1@ig.com.br
</a>> wrote:<br><blockquote class="gmail_quote" style="border-left: 1px solid rgb(204, 204, 204); margin: 0pt 0pt 0pt 0.8ex; padding-left: 1ex;"><div>Bom dia, pessoal. Estou tentando remover algumas pastas que estão num diretório principal, usando o código abaixo:
</div>
<p><br>use CGI qw ( :standard );<br>use warnings;<br>use strict;</p>
<p>my @clear = param ( "limparlog" );</p>
<p>my $dir = "/var/imm/chats/";<br>opendir (MSN, $dir);<br>my @diretorio = readdir (MSN);<br>close (MSN);</p>
<p>my $usuario;<br>foreach $usuario (@clear) {<br>rmdir ("$dir/$usuario");<br>}</p>
<div><font color="#888888">O código não dá erro, no entanto, não exclui nenhum diretório.. Há alguma coisa errada nessa "bomba" acima..?</font></div>
<br><br></blockquote></div>