[Cascavel-pm] Zipando arquivos no servidor.

[Alceu R. de Freitas Jr.]

 --- João Gabriel <jamorreu em gmail.com> escreveu: 
> Me passaram esse código para zipar arquivos no
> servidor:
> 
> TAR:
> tar -cvzf nome.tar.gz pastas arquivos etc
> 
> ZIP:
> zip -r nome.zip arquivos pastas etc
> 
> Logo, usei o comando system para executados, e fiz o
> seguinte teste:
> 
> Para zipar como tar usei:
> (vai zipar a pasta fórum e esse arquivo tera o nome
> de teste.tar.gz)
> >>> system("tar -cvzf teste.tar.gz forum")
> 
> Para zipar como zip usei:
> (vai zipar a pasta fórum e esse arquivo tera o nome
> de teste.zip)
> >>> system("tar -cvzf teste.zip forum")
> 
> Porém nenhum dos códigos funcionaram e a página não
> deu erro.
> Alguém sabe o porque do código não ter funcionado?

Gabriel,

Procure usar módulos Perl para fazer essas tarefas.
Com certeza você vai encontrar um módulo para
trabalhar com tar e gzip (prefira o gzip ao invés do
zip). Isso evita que vc faz system calls através do
Perl, o que é de longe mais seguro em termos de CGI.
Leia "perldoc perlsec" para maiores detalhes.

Você pode testar a saída de comandos através de system
usando:

system("echo hello world") && die "Ocorreu um erro:
$!";

Isso lhe trará o erro. Como vc está usando um cgi, use
o módulo CGI::Carp para redirecionar mensagens da
função die para o log do servidor web.

[]´s
Alceu






	
	
		
_______________________________________________________ 
Yahoo! Acesso Grátis - Internet rápida e grátis. Instale o discador agora! http://br.acesso.yahoo.com/