CGI :: البحث طريقة بسيطة لاستخدام CGI للبحث عن ملفات قاعدة البيانات المسطحة
التحميل الان

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

CGI :: البحث العلامات

بحث قاعدة البيانات الوحدة النمطية بيرل قاعدة بيانات نصية مسطح النص

CGI :: البحث وصف

طريقة بسيطة لاستخدام CGI للبحث ملفات قاعدة البيانات النص ثابت العديد من CGIs ببساطة البحث في قواعد البيانات النص مسطحة وتعود النتائج إلى المتصفح. تنفذ CGI :: بحث واجهة عامة للبحث قواعد البيانات هذه والعودة إلى HTML :: كائن قالب جاهز لعرضه على المتصفح. إرجاع البيانات كما تجزئة للصفائف من الممكن أيضا، على الرغم من أن هذا من المحتمل أن تكون أقل المستخدمة في practice.Input من المستخدم ويتم التحقق من قاعدة البيانات بسهولة، مما يجعل من السهل لكتابة كائن code.An أمنا وأكثر قوة Oreinted وخالصة لاحظ أن مفهومين المتعامدة (البحث والمستخدم التحقق من صحة المدخلات) ويجري حاليا وضع معا. في هذه الحالة، لقد رفض النهج خالصة لربط هذه معا اثنين من شأنها أن تجعل من السهل جدا القيام به التحقق من صحة أنه لا يوجد عذر لعدم القيام بذلك. إذا كان الأصوليون يريدون استخدام وحدة نمطية مختلفة (وربما الكتابة مرتين كرمز الكثير من يفعل ذلك)، وهذا هو ما يرام مع استخدام me.SYNOPSIS CGI :: بحث QW (: المصادقون)؛ QW استخدام CGI (: قياسي). بلدي $ TMPL_FILE = '/ الطريق / / قالب'؛ بلدي $ DB_FILE = '/ الطريق / / flat_file'؛ بلدي $ DB_SEPERATOR = '\ |'؛ # تأكد من الفرار أي حرف التعابير المنطقية الخاصة وضعت في وعلامات الاقتباس المفردة # هذه ليست مدقق جيدة. لا تفعل هذا. بلدي $ CUSTOM_VALIDATOR = الفرعية {إذا ($ _ = ~ /\A(.*)\z/) {عودة (1، 1 $، "مرت")؛ } شيء آخر {عودة (0، نديف، "$ _ غير صالح")؛ }}؛ # حقول قاعدة البيانات وصفDB_FIELDS الخاص بي = (، ، ، ، ،)؛ # خيارات الاستدعاء. وverfied كل تلقائيا كعدد بلدي $ RESULTS_PER_PAGE = المعلمة ( 'RESULTS_PER_PAGE') || 0؛ بلدي $ MAX_RESULTS = 0؛ # Infinate بلدي $ PAGE_NUMBER = المعلمة ( 'PAGE') || 0؛ # بحث خياراتي بحث = (NUM1 => ، والبريد الإلكتروني => ،)؛ # مجالات أخرى. يتم تمرير هذه إلى السيناريو الخاص بك عندما يحدث ترقيم الصفحات، # ولكن لا يشاركون في البحث بلدي = أخرى (PARAM1 => المعلمة ( 'PARAM1') || 0، PARAM2 => المعلمة ( 'PARAM2') || 0) . بلدي $ البحث = CGI :: Search-> جديد (البرمجي => $ ENV {} البرمجي، قالب => $ TMPL_FILE، db_file => $ DB_FILE، db_seperator => $ DB_SEPERATOR، db_fields => \DB_FIELDS، results_per_page => $ RESULTS_PER_PAGE، max_results => $ MAX_RESULTS، PAGE_NUMBER => $ PAGE_NUMBER، search_fields => \ SEARCH، = أخرى> \ أخرى،)؛ # قائمة السياق - عودة مجموعة من بين التجزئات بلديdata = $ search-> نتيجة (1) أو يموت "خطأ". $ search-> errstr ()؛ # عددي السياق - عودة HTML :: قالب يعترض بلدي $ tmpl = $ search-> نتيجة (1) أو يموت "خطأ". $ search-> errstr ()؛ بلدي new_search = (NUM1 => ، والبريد الإلكتروني => ،)؛ # تشغيل بحث مع معلمات مختلفة بلدي $ new_tmpl = $ search-> نتيجة (1 \ new_search)؛ متطلبات: perl.

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