perl实现scp的功能

ppiqq

谢谢大家 我安装好了 但是这个调用的好像还有问题，求大哥们不吝指教
#!/usr/bin/perl
use strict;
use Net::SSH:erl;
   my $ssh = Net::SSH:erl->new("192.168.1.5",port => "2121";
   $ssh->login("test", "123456789" );

这个程序是可以执行了 但是好像是DO NOTHING！

[ 本帖最后由 ppiqq 于 2008-6-17 12:52 编辑 ]

ppiqq

OK 谢谢各位大哥的指点 问题已经解决 谢谢