كيف يمكن لأحد أن تحويل من FTP SFTP لفي السيناريو بيرل؟

Question

ولدي المخطوطة الموجودة التي تستخدم كائن FTP لإرسال اثنين من الملفات إلى مربع AIX. لقد اكتشفت للتو أن ينكس لدينا لا يدعم FTP. ما زالت تقدم الدعم SFTP. ما هي الخطوات التي يجب أن تذهب من خلال تحويل مخطوطتي لاستخدام SFTP؟

Answer 1

والسيناريو الحالي الخاص بك هو على الارجح باستخدام نت :: FTP وحدة . ستحتاج إلى نت :: SFTP حدة وتبعياته من CPAN. يمكنك حتى مجرد بداية نصي جديد باستخدام واحد القائمة كدليل. المنطق هو نفسه، وبالرغم من ذلك. الاتصال، إرسال، وقطع الاتصال.

Answer 2

ولقد فعلت فعلا شيئا من هذا القبيل. ولكن كان لإعداد أي برنامج نصي FTP الحالي ليتم تشغيلها عبر SFTP عند الحاجة.

ولقد تقدمت كائن التفاف حول Net::SFTP حيث يبدو ويتصرف مثل <ل أ href = "http://search.cpan.org/perldoc؟Net::FTP" يختلط = "noreferrer"> Net::FTP الكائن. ولذلك، فإن جميع المكالمات يمكن أن تترك في أماكن مع تنفيذ مختلف.

وذهبت من هذا:

my $client = Net::FTP->new( Host => 'ftp.somehost.com', ... );

إلى

my $client = FTPClient->new( Host => 'ftp.somehost.com', ...
                           , secureFTP => 1 
                           ); 

وتنفذ فقط كل الطرق كنت تستخدم من Net::FTP في صفي جديدة . Net::SFTP يعيد بعض عوائد مختلفة، ولذلك عليك أن التفاف فعلا وظيفة بدلا من مجرد استخدام شيء من هذا القبيل Class::Delegator .