جراب :: محلل

POD :: Parser هو فئة PERL الأساسية لإنشاء مرشحات وقطاع الجراح والمترجمين.
التحميل الان

جراب :: محلل الترتيب والملخص

الإعلانات

  • Rating:
  • رخصة:
  • Perl Artistic License
  • السعر:
  • FREE
  • اسم الناشر:
  • Brad Appleton
  • موقع ويب الناشر:
  • http://search.cpan.org/~marekr/Pod-Parser-1.35/lib/Pod/Parser.pm

جراب :: محلل العلامات


جراب :: محلل وصف

Pod :: Parser عبارة عن فئة PERL الأساسية لإنشاء مرشحات جراب ومترجمين. POD :: Parser هي فئة PERL الأساسية لإنشاء مرشحات الجراح والمترجمين. استخدام POD :: محلل حزمة myparser. @ ISA = QW (جراب :: محلل)؛ command sub {my (parser parser، $ الأمر، $ الفقرة، $ line_num) =_؛ ## تفسير الأمر ونصها؛ قد تكون الإجراءات العينة: إذا كان ($ الأوامر EQ "Head1 ') {...} Elsif ($ Command EQ' Head2 ') {...} ## ... أوامر أخرى وأفعالها الخاصة بي out_fh = $ parser- > خرج_handle ()؛ بلدي توسيع $ = $ parser-> الاسترابط (الفقرة $، $ line_num)؛ طباعة $ out_fh توسيع $؛ } الفرعية Verbatim {بلدي (محلل المحلل بمحلل $، فقرة $، $ line_num) = @ _؛ ## تنسيق الفقرة الحرفية؛ قد تكون الإجراءات العينة: بلدي $ out_fh = parser- $ parser-> outworge_handle ()؛ طباعة $ out_fh الفقرة $؛ } TextBlock Sub {My (Parser Parser، الفقرة $، $ line_num) =_؛ ## ترجمة / تنسيق كتلة النص هذه؛ قد تكون الإجراءات العينة: بلدي $ out_fh = parser- $ parser-> outworge_handle ()؛ بلدي توسيع $ = $ parser-> الاسترابط (الفقرة $، $ line_num)؛ طباعة $ out_fh توسيع $؛ } Sub Interide_Section {My (Parser Parser، $ seq_command، $ seq_argument) =_؛ ## توسيع تسلسل داخلي؛ قد تكون الإجراءات العينة: العودة "* $ seq_argument *" إذا ($ seq_command eq 'b')؛ إرجاع "$ seq_argument" "إذا كان ($ seq_command eq 'c')؛ ارجع "_ $ {seq_argument} _ '" إذا كان ($ seq_command eq' i ')؛ ## ... أوامر تسلسل أخرى ونصها الناتج} ## قم بإنشاء كائن محلل وجهاز تحليل الملف الذي كان اسمه ## المعطى في سطر الأوامر (استخدم Stdin إذا لم يتم تقديم أي ملفات). Parser $ = جديد myparser ()؛ Parser $-> parse_from_filehandle (* stdin) إذا (@ @ @ @ == == 0)؛ ل (Argv) {$ parser-> parse_from_file ($ _)؛ } متطلبات: perl.


جراب :: محلل برامج ذات صلة