ru.unix.bsd

 
 - RU.UNIX.BSD ------------------------------------------------------------------
 From : Eugene Grosbein                      2:5006/1       14 Jul 2000  12:15:46
 To : Alex Brovarnik
 Subject : Re: wget
 -------------------------------------------------------------------------------- 
 

 
 >Hi All!
 >
 >А как сделать wput?  8-)
 
 #!/usr/bin/perl
 
 use Net::FTP;
 
 $ftp=Net::FTP->new('ftp.myhost.ru');
 die "cannot connect host: $@\n" unless $ftp;
 
 $ftp->login('user',"password") or die "cannot login to ftp server: $@\n";
 $ftp->cwd('/incoming/logs') or die "cannot change directory: $@\n";
 $ftp->type($ftp->binary()) or die "cannot set binary mode: $@\n";
 $ftp->put('myfile') or die;
 $ftp->quit();
 
 --- slrn/0.9.6.2 (FreeBSD)
  * Origin: SVZ-Service (2:5006/1@fidonet)
 
 

Вернуться к списку тем, сортированных по: возрастание даты  уменьшение даты  тема  автор