Question

在线求助，用shell脚本在FTP命令下怎么创建当前日期命名的文件夹？

在线求助，用shell脚本在FTP命令下怎么创建当前日期命名的文件夹？

Answer 1

ftp -n $IP <<EOF
date | mkdir
EOF

Answer 2

perl 可以吗？

追问

只要可以实现：我要把数据备份到远程LINUX/ftp服务器上，要在FTP服务器上建立以当前日期为名字的文件夹，或者有一定规律命名的文件夹。。per1脚本怎么写？

追答

你在 ftp服务器上 建个计划任务 不就行了 先建好这个文件 然后这边再上传 时间错开就行了 没必要这么麻烦

追问

没有在FTP服务器上的权限

追答

 #!/usr/bin/perl -w

use Net::FTP;

sub getTime{
my ($sec,$min,$hour,$day,$mon,$year,$wday,$yday,$isdst)=localtime(time);
$day=($day<10)?"0$day":$day;
$mon=($mon<9)?"0".($mon+1):($mon+1);
$year+=1900;
$sec=($sec<10)?"0$sec":$sec;
$min=($min<10)?"0$min":$min;
$hour=($hour<10)?"0$hour":$hour;
my $now="$year$mon$day";  #这边定义创建文件夹的命名格式 现在是 年月日 中间没分隔符
return $now;
}

$ftp = Net::FTP->new
 (
 "1.1.1.1",  #ftp地址
 Timeout => 30 ) or die "Could not connect.\n";

 #登录用的用户名和密码
 $username = 'test';
 $password = 'test';
 $ftp->login($username,$password) or die "Could not login.\n";

#$ftp->cwd('/test') or die "Can not change dir :,$ftp->message";  #切换目录到/test  如果不是在根目录下创建这边可以切换
$name=getTime;
$ftp->mkdir("/$name") or die "Can not mkdir :",$ftp->message;
$ftp->quit;

###  运行前需要先安装下perl 模块，  shell 下执行  cpan Net::FTP