perl Net::FTP
Добавлено: 2008-07-04 15:13:20
как Perl скриптом изменить права на файл после того как он залит на сервер?
Код: Выделить всё
my $mod = `chmod -R 777 /path/to/file`;
system $mod;
forum.lissyara.su
Пока противник рисует карты наступления, мы меняем ландшафты, причём вручную
https://forum.lissyara.su/
perl Net::FTP
Страница 1 из 1
Re: perl Net::FTP
Добавлено: 2008-07-04 15:18:38
Re: perl Net::FTP
Добавлено: 2008-07-04 15:20:56
неа. это локально.
а нужно на залитом на сервер файле. и только посредством фтп.
а нужно на залитом на сервер файле. и только посредством фтп.
Re: perl Net::FTP
Добавлено: 2008-07-04 15:23:18
у ftp команда аналогичная chmod
Код: Выделить всё
man ftpRe: perl Net::FTP
Добавлено: 2008-07-04 15:26:46
Код: Выделить всё
$ftp = Net::FTP->new("ftp сервер", Timeout => 30, Debug => 0) || die "Can't connect to ftp server.\n";
$ftp-> cwd();
$ftp->chmod("0777", " удаленный файл");
$ftp->quit();Re: perl Net::FTP
Добавлено: 2008-07-04 15:31:19
Код: Выделить всё
Can't locate object method "chmod" via package "Net::FTP" at ./protei_ftp.pl line 21.
Re: perl Net::FTP
Добавлено: 2008-07-04 15:53:20
само сабой.
в модуле Net::FTP нет поддержки chmod, но есть метод quot.
и вот как его использовать, млин, не пойму.
в модуле Net::FTP нет поддержки chmod, но есть метод quot.
и вот как его использовать, млин, не пойму.
Код: Выделить всё
=over 4
=item quot (CMD [,ARGS])
Send a command, that Net::FTP does not directly support, to the remote
server and wait for a response.
Re: perl Net::FTP
Добавлено: 2008-07-04 17:21:55
добил тему.
Код: Выделить всё
$ftp->quot('site', "chmod 0755 $file");