البرنامج النصي :: Toolbox. البرنامج النصي :: Toolbox هو إطار بيرل لبرامج نصوص الأعمال اليومية.
التحميل الان

البرنامج النصي :: Toolbox. الترتيب والملخص

البرنامج النصي :: Toolbox. العلامات

إطار العمل الوحدة النمطية بيرل بيرل الإطار بيرل البرامج النصية التجارية

البرنامج النصي :: Toolbox. وصف

البرنامج النصي :: Toolbox هو إطار بيرل لبرامج نصوص الأعمال اليومية. البرنامج النصي :: Toolbox هو إطار بيرل لبرامج نصوص الأعمال اليومية. يستخدم Script Script :: Toolbox QW (: ALL)؛ أو استخدام البرنامج النصي :: Toolbox QW (Open Log Exit Table Under System Dir System) $ e = script :: toolbox-> جديد ()؛ # # تسجيل سجل # ("رسالة السجل")؛ # تسجيل الدخول إلى سجل Stderr ("رسالة السجل"، "Stderr")؛ # تسجيل الدخول إلى سجل Stderr ("رسالة السجل"، "Stdout")؛ # تسجيل الدخول إلى سجل Stdout ("رسالة السجل"، "/ TMP / x")؛ # سجل إلى / TMP / X سجل ("رسالة السجل"، IO IO :: ملف "/ TMP / XXX")؛ # تسجيل الدخول إلى / tmp / xxx script :: toolbox-> جديد ({logdir => {mod => '= s'، desc => "سجل الدليل"، MAND => 1، الافتراضي => '/ var / log' }})؛ سجل ("رسالة السجل")؛ # سجل إلى /var/log/.log سجل ("رسالة السجل"، "Syslog"، "شدة"، "العلامة")؛ # سجل عبر جداول تنسيق # # # # طباعة مثل: # طباعة الانضمام "n"، @ {$ t}؛ $ t = $ e-> جدول (؛ $ t = $ e-> جدول (، '|')؛ $ T = $ E-> الجدول (، ، ، ،" البيانات "=> ، ، ]})؛ $ t = $ e-> جدول ({'العنوان' => 'Hash مع رؤوس الأعمدة التلقائية (F1، F2، F3) "، بيانات" => })؛ # # خيارات سطر الأوامر # $ tb = script :: toolbox-> جديد ({file => {mod => '= s'، desc => "الوصف"، MAND => 1، الافتراضي => '/ bin / cat '}})؛ $ ملف = tb-> getopt ('file')؛ # مهملة، استخدم ملف $ التالي = TB -> {'file'}؛ قديم = tb-> setopt ('newfile')؛ الاستخدام ()؛ # طباعة رسالة استخدام لجميع الخيارات # إذا كانت متوفرة الطباعة أيضا استخدام POD ('هذا نص إضافي للاستخدام ")؛ # # دليل التعامل مع # $ arrref = dir ('/ tmp')؛ # الكل ماعدا . و .. $ arrerf = dir ('/ tmp'، '. * patt')؛ # كل مطابقة Patt $ arrif = dir ('/ tmp'، '! * patt')؛ # جميع لا تطابق patt # # ملف التعامل مع # $ arrref = الملف ('المسار / إلى / ملف')؛ # قراءة الملف في صفيف $ arrref = file ("/ bin / ps |)؛ # قراءة COMAND Stdout إلى ملف الصفيف ("> المسار / إلى / ملف"، "تجاوز المحتوى القديم")؛ ملف ("المسار / الملف / الملف"، "إلحاق هذا إلى الملف")؛ ملف ("المسار / إلى / ملف"، $ ArrRef)؛ # ملف عناصر مجموعة الملحق ("المسار / إلى / ملف"، $ arrirf، $ recsep)؛ # ملف عناصر مجموعة الملحق ("المسار / الملف / الملف"، $ hashref، $ recsep، $ fieldsep)؛ # إلحاق كملف خطوط القيمة الرئيسية ("| / bin / cat"، "hello world.n")؛ $ filehandle = tmpfile ()؛ # فتح ملف مؤقت جديد $ arrref = tmpfile ($ filehandle) # قراءة temp ملف كامل # # مخرج الشفاء (1، "خروج رسالة")؛ # الخروج مع عودة 1، # كتابة رسالة خروج # عبر سجل () $ FH = فتح ("> / TMP / XX")؛ # إرجاع كائن ملف IO :: مع # / TMP / XX مفتوحة للكتابة # تموت مع إدخال LogFile إذا فشل $ FH = Open ("/ BIN / PS |")؛ # إرجاع كائن IO :: ملف # يموت مع إدخال LogFile إذا فشل RC = النظام ("/ bin / LS") # تنفيذ أمر النظام و # أبلغ إخراجها في LogFile #. $ الآن = الآن ()؛ Printf "اليوم: D Mon: d السنة: d wday: d yday: D ISDST: D Sec: D Min: D ساعة: D"، $ D "، $ الآن -> {mday}، $ الآن -> {mon}، $ الآن -> {year}، $ الآن -> {wday}، $ الآن -> {yday}، $ الآن -> {ISDST}، $ الآن -> {SEC}، $ الآن-> {min}، $ الآن -> {ساعة}؛ $ الآن = الآن (" A، B D، Y")؛ # الاثنين، 10 أكتوبر 2005 = يجب أن تكون الوحدة النمطية Head1 التزلج على "سكين الجيش السويسري" للمهام اليومية. الأهداف الرئيسية هي معالجة سطر الأوامر، ورسائل الاستخدام التلقائي، والافتقاط الإشارة (مع التسجيل)، وسجل بسيط تنسيق البيانات، وتنسيق البيانات البسيط، والدليل البسيط ومعالجة الملفات. الإبلاغ: perlwhat جديد في هذا الإصدار: معلمة جديدة الآن ({diff => }) إصلاح الأخطاء في اختبار T03_EXIT

البرنامج النصي :: Toolbox. برامج ذات صلة