صافي :: FTP :: شائعة تبسيط الاستخدام الشائع من Net :: FTP
التحميل الان

صافي :: FTP :: شائعة الترتيب والملخص

صافي :: FTP :: شائعة العلامات

الوحدة النمطية بيرل بيرل شائع

صافي :: FTP :: شائعة وصف

تبسيط الاستخدام الشائع من Net :: FTP NET :: FTP :: Common هو وحدة بيرل التي تهدف إلى جعل الاستخدامات الشائعة للشبكة :: FTP قضية واحدة ولا حجة. بمعنى آخر، لديك 100 برمجة مع Net :: FTP. مع Net :: FTP :: شائع سيكون لديك تكوين 95 وبرمجة بنسبة 5. الطريقة التي يجعلها علاقة خطية واحدة هي أن مرحلة ما قبل المرحلة السابقة من تسجيل الدخول، القرص المضغوط، نوع الملف (ثنائي / ASCII) هو التعامل معها لك. الطريقة التي يجعلها تستخدم علاقة غرامة لا الحجة هي سحب الأشياء من التجزئة التي تكوينها في وقت البناء. يجب أن يتم توفير الوسائط لأي وظيفة API، ثم يتم تطبيق هذه التغييرات على تجزئة حالة الكائن وتستخدمها أي وظيفة API المستقبلة المستقبلة التي قد تحتاج إليها. الأمراض الدمج لهذه الوحدة يهدف إلى أن يكون واضحا ومصمما. الخطوات العامة التي سيتم استخدامها هي: * استخدام Net :: FTP :: Common * تحديد معلومات تكوين FTP هذا يمكن إبزيمها داخل البرنامج النصي ولكن في كثير من الأحيان سيتم تخزين هذا في وحدة الاستخدام للاستخدام في العديد من البرامج النصية الأخرى. * استخدم Net :: FTP :: وظيفة API المشتركة ملاحظة جيدا أنك لا تضطر أبدا إلى تسجيل الدخول أولا. تقوم جميع وظائف API تلقائيا بتسجيل الدخول وتغييرها إلى الدليل المكون أو المحدد. ومع ذلك، في بعض الأحيان من المفيد معرفة ما إذا كان يمكنك تسجيل الدخول فعليا قبل محاولة القيام بشيء آخر على موقع FTP. هذه هي المرة الوحيدة التي ستحتاج فيها إلى تسجيل الدخول () طريقة API .synopsis لدينا netftp_cfg = (debug => 1، timeout => 120)؛ لدينا common_cfg = (# # خيارات 2 الأولى، إذا لم تكن موجودة، # تؤدي إلى الاعتماد على .netrc لتسجيل الدخول المستخدم => "مجهول"، تمرير => 'tbone@cpan.org'، # # خيارات أخرى # => 'Delete.zip' # الإعداد Setup شيء مقابل EZ-> احصل على المضيف => 'FTP.FCC.GOV'، # الكتابة فوق ftp.microsoft.com افتراضي LocalDir => '/ tmp'، remotedir => '/'، # القرص المضغوط التلقائي على الجهاز البعيد إلى Remotedir Type => 'A' # Overwrite I (ثنائي) اكتب افتراضي)؛ # لاحظ جيدا!!! يتم تمرير أحد تنازلي واحد عن طريق المرجع، # أخرى حسب القيمة. هذا غير متسق، لكنه لا يزال أمرا جيدا. # صدقنى! فكرت في هذا. ولدي سبب وجيه: # هذا هو السماح بأقل تعديل للشبكة الإرث :: رمز مصدر FTP. $ ez = net :: ftp :: common-> جديد (\ common_cfg، netftp_config)؛ # هل يمكننا تسجيل الدخول إلى الجهاز؟ # ملاحظة: ليس من الضروري أبدا تسجيل الدخول أولا قبل الاتصال # Net :: FTP :: وظائف API الشائعة. # هذه الوظيفة هي فقط للتحقق لمعرفة ما إذا كانت الآلة أعلى. # يتم نشره كجزء من API لأنني وجدت أنه مفيد عند كتابة البرامج النصية FTP التي المسح الضوئي لموقع FTP لأول مرة لاستخدامها للتحميل. يتم وصف دلالات # الدعوة والعودة الدقيقة لهذه الوظيفة # وبرنامج مبرر أدناه. $ ez-> تسجيل الدخول أو يموت "غير قادر على تسجيل الدخول: $ @"؛ # احصل على قائمة من الدليل البعيد القائمة @ = $ ez-> ls؛ # دعونا قائمة دليل مختلف، والإفراط في ركوب وتغيير directory # Directory القائمة الافتراضية @ = $ ez-> ls (remotedir => '/ pub / rfcs')؛ # دعونا قائمة DIR الافتراضي على العديد من المضيفين Host_Listings = الخريطة {$ ez-> ls (host => $ _)} > $ _) }Dir_List؛ # دعنا نحصل على قائمة دليل مفصل ... (شكرا كيفن!) سرد = $ ez-> dir؛ # لاحظ هذا هو التجزئة، وليس قيمة العودة صفيف. ### تمثيل "اختبار الإخراج" => {'المالك' => "الجذر"، "شهر" => 'Jan'، 'Linktarget' => undef، "iNode '=>' 1 '' '6'، 'Group' => 'Root'، 'unortime' => '1999'، 'اليوم' => '27'، 'perm' => '-rw-r - r--'}، RANC '=> {' المالك '=>' Root '=' شهر '=>' Oct '،' Linktarget '=> undef، "INODE' => '2'،" 2 "،" الحجم "=>" 4096 "،" '=>' الجذر '،' tenortime '=>' '00: 42 '، "اليوم" =>' 31 '،' PERM '=> "DRWXR-XR-X'} احصل على ملف من الجهاز البعيد $ EZ -> احصل (RemoteFile => 'Codex.txt'، localfile => '/tmp/crypto.txt')؛ # احصل على ملف من الجهاز البعيد، ومحدد DIR: $ EZ-> الحصول على (remotefile => 'codex.txt'، localdir => '/ tmp')؛ # لاحظ جيدا: نظرا لأن مجموعة المكالمة السابقة SET LocalFile، فإنه لا يزال جزءا من مخزن الكائنات. وبعبارة أخرى، سيحاول هذا المثال # لتخزين الملف الذي تم تنزيله في /tmp/tmp/crypto.txt. # أفضل ليقول: $ ez-> get (remotefile => 'codex.txt'، localdir => '/ tmp'، localfile => '')؛ # إرسال ملف إلى الجهاز البعيد (* لا تفعل * استخدام وضع!) $ ez-> إرسال (relimerfile => 'codex.txt')؛ # اختبار وجود وجود ملف على الجهاز البعيد (باستخدام = ~ )File = $ ez-> grep (grep => qr / * txt /)؛ # اختبار لملف على الجهاز البعيد (استخدام EQ) $ ez-> موجود (runielfile => 'الحاجة - file.txt')؛ # لاحظ أن هذا ليس أكثر مما تتصل يدويا: # (Scalar Grep {$ _ EQ 'File.txt'} $ EZ-> LS)> 0؛ # دعونا نحصل على جميع الإخراج مكتوبا إلى Stderr إلى GoTo LogFile My EZ = NET :: FTP :: Common-> جديد ({g، Stderr => $ logfile}، netftp_cfg)؛ متطلبات: perl.

صافي :: FTP :: شائعة برامج ذات صلة