Ol� Eduardo,

Utilize a biblioteca do Perl "Copy::File"... o script ficaria mais ou menos
assim:

use Copy::File;
copy("arquivo1.txt", "copia/do/arquivo1.txt");
chmod (0755, "copia/do/arquivo1.txt");
print "Content-type: text/html\n\n";
print "Opera��o efetuada\n";

S�;

Abra�os
-----------------------------------------------------------
Guilherme Mendes
Sistema Interserv - http://www.interserv.com.br
Grupo PerlBR - http://www.perlbr.com.br
-----------------------------------------------------------
----- Original Message -----
From: Eduardo Mota <[EMAIL PROTECTED]>
To: <[EMAIL PROTECTED]>
Sent: Wednesday, March 22, 2000 1:33 PM
Subject: [perl] Copiando Arquivo


Ol� Pessoal,
Algu�m poderia me ajudar ?
Tenho um Script em PERL e gostaria que ele execut�-se a seguinte fun��o:

1�) copia arquivo "test.txt" para o diret�rio "funciona"
2�) atribuir 755 ao arquivo: "funciona/test.txt"
3�) Imprimir "C�pia efetuado"

#!/usr/bin/perl
copiar ("test.txt", "funciona");  # >> N�o sei o comando de copiar arquivo !
chmod(0755, "funciona/test.txt");
print "Content-type: text/html\n\n";
print "C�pia efetuado !\n";
________________________________________________

Eduardo Mota, EMota - WebMaster
http://users.sti.com.br/emota
E-Mail: [EMAIL PROTECTED]
UIN: 2731255

http://www.mrweb.com.br/perl/
=============
>>No site da lista, voce tera tudo sobre PERL,
>>LINUX, PHP, ASP e informacoes, cadastramento
>>e descadastramento da Lista.
=============

http://www.mrweb.com.br/perl/
=======================================
>>No site da lista, voce tera tudo sobre PERL,
>>LINUX, PHP, ASP e informacoes, cadastramento
>>e descadastramento da Lista.
=======================================

Responder a