FTP断点续传开发

Luckyhan

最近用perl作FTP传输的程序
需要用断点续传
但是用了rest后
如果用perl的stor函数，则can't open data connection
如果用perl的put函数， 则断点续传了，但是多传了原来已经有的文件
#######################
                $filesize = $ftp->;size( @FILEQUE[$i]);
                print "filesize: $filesize\n";
                $ret = $ftp->;put( $localdatafile  ,$datafile );
                #######################
                if ( $filesize >;0)
                {
                        $ret = $ftp->;_REST( $filesize);       
                        my $message = $ftp->;message;
                        print "messagemessage\n";                                         
                        print "ftp-rest: $ret\n";
                }
                #$ret = $ftp->;put( $localdatafile  ,$datafile );
                sleep( 10);
                $ftp->;pasv();
                $message = $ftp->;message;
                print "messagemessage\n";
                #$ret = $ftp->;put( $localdatafile  ,$datafile );       
                #$ret = $ftp->;stor( $datafile);  #can't open data connection
               
                $ret = $ftp->;_STOR(@FILEQUE[$i]);#can't open data connection
                #$ret = $ftp->;put(@FILEQUE[$i]);  #

Luckyhan

还是因为perl提供的ftp库不支持好像
在库里面加了个函数就可以了

log2002

楼主的问题解决了吗？我也遇到了同样的问题