我使用perl Net:: FTP ::Recursive模块将文件夹从本地上传到FTP。我已经编写了下面的示例代码。在这段代码中,我需要知道上传过程的状态,比如它是否已经上传。
use strict;
use Net::FTP:recursive;
my $ftp_con= Net::FTP::Recursive->new('host.com',Debug=>0);
$ftp_con->login('username','password');
$ftp_con->rput('d:\my_test',&
我想尝试上传多个图片到一个文件夹在我的FTP。我已经尝试上传到我的数据库,这对我的代码是有效的。这是我第一次编写代码来将文件上传到FTP。
In my config.php:
$ftp_server = "**";
$ftp_username = "**";
$ftp_password= "**";
$connect = mysql_connect($ftp_server, $ftp_username, $ftp_password)
or die ("Hey, check your server connection.");
代码