怎样实现让这个函数拷贝wikidb_20080516.dmp.gz这个文件

ppiqq

sub scp{

system("/usr/bin/scp -P 2222 anxb\@$S_IPS_DIR/wikidb\_$date.dmp.gz  $t_dir";

w_log();
}
怎样实现让这个函数拷贝wikidb_20080516.dmp.gz这个文件
谢谢大家了 谢谢大家对我的支持和关心以及帮助 谢谢大家

cobrawgl

原帖由 ppiqq 于 2008-5-20 13:34 发表
谢谢楼上的大哥 但是还是不行
一直在报这个错误
sh: line 1: .dmp.gz: command not found

还是 system 里那个字符串有问题，你打印出来看看？

churchmice

1.知道system就知道如何调用外部命令
2.知道如何调用外部命令你就可以自己试验下你的外部命令有没有成功
3.如果成功再整合到perl里面

ppiqq

谢谢你小白大哥 我觉得主要的问题好像是因为我不会里面的转义啊什么的才上来求救的
也可以说就是整合不进去………………等待答案

cobrawgl

File::Copy - Copy files or filehandles

另外，你的 system 里那么写是不正确的。

btw，你把表情去掉啊

ppiqq

会楼上的大哥，我是想实现远程拷贝的功能

system("/usr/bin/scp -P 2222 anxb\@$S_IPS_DIR/wikidb\_$date.dmp.gz  $t_dir";

中间的那个是
冒号+美元符号

cobrawgl

1. 
   
2. my $command = '/usr/bin/scp -P 2222 anxb@'.$S_IP.':'.$S_DIR.'/wikidb_'.$date.'.dmp.gz '.$t_dir;
   
3. system($command) or die;
   

复制代码

这样可以吗，我这里测试不了。

ppiqq

谢谢楼上的大哥 但是还是不行
一直在报这个错误
sh: line 1: .dmp.gz: command not found

ppiqq

恩啊 大哥 应该就是那个点的问题吧
我这样了system("scp -P 2222 anxb\@$S_IPS_DIR/pptest_'$date'.dmp $t_dir";
test!!!!!
pptest_20080519                                                                                   100%    0     0.0KB/s   00:00   
bash: line 1: .dmp: command not found
认出前面的部分 但是没有认出“.dmp”这个字符串。
PS：那个下面有两个文件 一个是pptest_20080519 另一个是pptest_20080519.dmp

cobrawgl

原帖由 ppiqq 于 2008-5-20 14:09 发表
恩啊 大哥 应该就是那个点的问题吧
我这样了system("scp -P 2222 anxb\@$S_IPS_DIR/pptest_'$date'.dmp $t_dir";
test!!!!!
pptest_20080519                                                          ...

你套用我这个格式，copy 到你的代码里试试，行吗？

1. 
   
2. my $command = '/usr/bin/scp -P 2222 anxb@'.$S_IP.':'.$S_DIR.'/wikidb_'.$date.'.dmp.gz '.$t_dir;
   
3. system($command) or die;
   

复制代码