สยามเว็บโฮส โฮสติ้งดี ราคาถูก

วัตถุประสงค์การก่อตั้งฯ
ห้องพระ-ชำระจิตใจ
เรื่องสั้น-บทความ
บทกลอน-บทกวี
เกมส์ออนไลน์
ตำหนักเพลงไทยเดิม
เซียมซีเสี่ยงโชค
กระดานสนทนา
ข่าวฝากประชาสัมพันธ์
กระดานซื้อ-ขายสินค้า
ฟรีอีเมล์เนื้อที่ 5 MB
ติดต่อ นายทะเบียน
Add to Favorites

ทั่วโลก www
ชมรมเว็บเพจไทย

Power by Google!
สนับสนุนพื้นที่ Hosting

สยามเว็บโฮสดอทคอม

 
Updated: 16/10/2545


บทความเรื่อง เริ่มเขียนสคริปต์ด้วยภาษา Perl โดย webmaster@thaitop.com

6. การใช้ Perl กับฐานข้อมูลอย่างง่าย

คุณจะได้เรียนรู้

  1. การสร้างฐานข้อมูล flat ไฟล์
  2. การเขียนข้อมูลใส่ฐานข้อมูล
  3. การแสดงข้อมูลในฐานข้อมูล
  4. การค้นหาภายในฐานข้อมูล

สมมุติว่าคุณทราบหลักการของฐานข้อมูลมาแล้ว ลืมแบบที่คุณเคยใช้มาก่อนนะครับ ในบทเรียนนี้เราจะเรียน เรื่องฐานข้อมูล แบบ flat file ซึ่งเป็นฐานข้อมูลที่เป็นไฟล์เอกสารโดยแต่ละชุดของข้อมูล (record ) จะถูกเก็บเป็นบรรทัด ต่อบรรทัดไป โดยแต่ละ ข้อมูลย่อยในแต่ละ record จะถูกขั้นด้วยเครื่องหมาย | หรือเครื่องหมายอื่นๆที่คุณพอใจ แต่ที่เป็นสากลจะใช้เครื่องหมาย | ดูตัวอย่างได้ครับ


จอภาพ | ขาว | 10,000 <-- 1 บรรทัดเรียกว่า record ประกอบด้วย 3 colum
เมาท์ | ดำ | 500
คีย์บอร์ด | ครีม | 1,000
Computer book |เขียว | 152
book of Perl | แดง | 500
Perl for ISAPI | Green | 900

ข้อมูลเหล่านี้จะเก็บไว้ในไฟล์ text ธรรมดาจะตั้งนามสกุลไฟล์เป็นอะไรก็ได้เช่น dat, txt, log หรือไม่มีนามสกุลก็ได้ ตอนนี้ก็รู้จักฐานข้อมูล flat file กันแล้ว เรามาลองเขียนข้อมูลใส่ flat file กันดีกว่า ขั้นตอนแรกให้เปิด notepad แล้ว save ไว้ใน cgi-bin ของคุณใช้ชื่อไฟล์ว่า database.txt โดยยังไม่ต้องพิมพ์อะไรใส่ลงไป นี่แหล่ะครับตอนนี้ก็ได้ฐานข้อมูลมาแล้ว ต่อมาเรามา เขียนโปรแกรมเพื่อเขียนข้อมูลเข้าฐานข้อมูลของเราดีกว่า โดยใช้หลักการเดิมๆที่เรียนมาคือการเปิดไฟล์เพื่อเขียนข้อมูล การรับข้อมูลจาก แบบฟอร์มไฟล์โปรแกรมมีดังนี้ครับ

  1. databaseadd.pl โปรแกรมที่ทำหน้าที่รับและเขียนข้อมูลใส่ฐานข้อมูล
  2. databaseadd.htm แบบฟอร์มรับข้อมูลจากผู้กรอกเพื่อมาส่งให้โปรแกรม

ถ้าคุณ download ครบทุก 3 ไฟล์แล้วให้เรียกไฟล์ .htm ก่อน แล้วกรอกข้อมูลให้ครบ คลิ้กส่ง แล้วดูผลการทำงานก่อน 1 รอบ เมื่อเข้าใจการทำงานแล้ว ให้เปิด code ของไฟล์ .pl ดูเพื่อศึกษขั้นตอนการวาง code ต่างๆ ซึ่งแน่นอนว่าคุณจะคุ้นๆหรือพอเข้าใจ เพราะได้เรียนมาแล้วนี่ครับ ใน code มีคำอธิบายอ่านดูนะครับ จะเห็นว่าบทหลังๆนี่ผมไม่ได้นำ code มาลงแล้วอธิบายเหมือนแรกๆ เป็นเพราะว่ามันจะทำให้หน้าเนื้อหายาวไม่น่าอ่าน ก็เลยใช้วิธีเขียนอธิบายไว้ในไฟล์แทน ส่วนไฟล์ที่ทำหน้าที่แสดงข้อมูลในฐานข้อมูล ของเรา ชื่อ database.pl มีคำอธิบายอยู่ภายในเช่นเดียวกันครับ  หลังจาก เขียน-อ่านฐาน ข้อมูลได้แล้ว  มาลองทำการค้นหาในฐานข้อมูลของเรากันบ้างดีกว่า การค้นหานี้ Perl จะมีคำสั่งหนึ่งที่เรียกว่า grep มีโครงสร้างดังนี้


@results = grep(/pattern/,@listname);

@results    คือผลจากการค้นหาจะอยู่ในรูปตัวแปร array
pattern       คือคำที่เราต้องการค้นหา
@listname  คือข้อมูลตัวแปร array ที่ให้โปรแกรมเข้าไปค้นหา

ก่อนอื่นสร้าง แบบฟอร์ม สำหรับพิมพ์คำค้นหาไว้ก่อนนะครับ จากนั้นสร้าง โปรแกรม ไว้ใน cgi-bin ของคุณ เวลาเรียกใช้งานให้เรียกแบบฟอร์มขึ้นมาก่อน พิมพ์ คำค้นหาลงไป และควรเป็นคำที่คุณเห็นว่ามีอยู่ในฐานข้อมูลด้วยนะครับ แล้วคลิ้กส่งโปรแกรมจะทำการค้นหาและราย งานผลการค้นหา  ลองอีกครั้งโดยพิมพ์คำอื่นๆ ที่ไม่มีในฐานข้อมูลดูบ้าง รายละเอียดและขั้นตอนมีอธิบายในไฟล์นะครับ


ใน บทที่  7 เราจะนำความรู้ที่ได้เรียนมา สร้างเป็นโปรแกรมง่ายๆ เพื่อใช้ในเว็บไซต์ไปดูกันได้เลยครับ


ชมรมเว็บเพจไทย ตั้งใจมุ่งมั่น สร้างสรรค์เพื่อมวลสมาชิก



เริ่มนับ 20 พฤศจิกายน 2547 เวลา 24.00 น.
เว็บไซต์แห่งนี้ออกแบบสำหรับจอภาพที่มีความละเอียด 800x600 Pixel และ เปิดชมด้วย IE4.0 ขึ้นไป

ชมรมเว็บเพจไทย เป็นเว็บไซต์ที่จัดทำขึ้นเพื่อเผยแพร่ข่าวสารและสาระความรู้เกี่ยวกับการสร้างเว็บไซต์ ให้แด่สมาชิกและผู้สนใจทั่วไป
โดยไม่หวังผลประโยชน์ทางธุระกิจ [Non Profit Organization] ก่อตั้งเมื่อวันที่ 16 ตุลาคม พ.ศ. 2540
ข้อมูลข่าวสาร บทความ และภาพประกอบ ที่ไม่อ้างถึงเจ้าของลิขสิทธิ์ สามารถนำไปใช้ได้โดยไม่ต้องขออนุญาต [Non Copyright]