บทเรียนภาษา Perl

 

บทที่ 1: เริ่มรู้จัก Perl

ไม่รู้ว่าเพราะอะไร แต่เหมือนกับว่า มันจะเป็นมาตรฐานไปเสียแล้ว ว่าเมื่อใครซักคนหนึ่ง ต้องการที่จะเรียนรู้ การเขียนโปรแกรม ในภาษาใดภาษาหนึ่ง จะต้องเริ่มเขียนโปรแกรม ให้แสดงข้อความว่า "Hello, world." และเช่นกัน เพื่อให้เหมือนกับมาตรฐาน ที่ชาวโลกเค้าใช้ๆกันอยู่ เราก็จะเริ่มทำความรู้จัก กับการเขียนโปรแกรม ภาษา Perl ด้วยโปรแกรมง่ายๆ โปรแกรมแรก ที่จะแสดงผลลัพธ์ออกมาว่า "Hello, world."

และนี่คือโปรแกรม ตามมาตรฐานโลก ที่เราจะใช้ในการ เริ่มต้นเรียนรู้ภาษา Perl

 

#!/usr/local/bin/perl
#
# This is my first program in perl.
#
print "Content-type:text/html\n\n";
print 'Hello world.'; # Print a standard message..

แต่ละส่วนของโปรแกรมมีความหมายดังต่อไปนี้

บรรทัดแรก โปรแกรมภาษา Perl ทุกโปรแกรมจะ เริ่มด้วยบรรทัดลักษณะคล้ายๆ อย่างนี้ (คล้ายๆหรืออาจจะเหมือน แล้วแต่ Server)

#!/usr/local/bin/perl

 

บรรทัดนี้จะเป็นตัวบอกกับ server ว่าจะต้องทำอะไรกับ ไฟล์โปรแกรมไฟล์นี้ เมื่อมีการสั่งให้ทำงานเกิดขึ้น (ในที่นี้ก็จะสั่งให้ เรียกโปรแกรม Perl มาแปล ชุดคำสั่งภาษา perl โปรแกรมนี้) ในส่วนของบรรทัดนี้ จะแตกต่างกันออกไป ขึ้นอยู่กับระบบที่คุณใช้งาน บาง server อาจจะเป็น #!/usr/bin/perl หรืออย่างอื่นก็ได้ ขึ้นอยู่กับ ผู้ดูแลระบบจะกำหนด

คำอธิบายโปรแกรม (Comment)

 

คำอธิบายโปรแกรม สามารถแทรกอยู่ในส่วนไหน ของโปรแกรมก็ได้ โดยจะต้องเริ่มต้น ด้วยตัวสัญลักษณ์ # ทุกสิ่งที่อยู่หลัง # ไปจนจบบรรทัด จะถูกมองข้าม ไปไม่นำมาทำงาน (ยกเว้นที่อยู่ที่บรรทัดแรก) ถ้าต้องการจะเขียน คำอธิบายโปรแกรมหลายๆ บรรทัดก็ทำได้โดยการใส่ # นำหน้าไว้ทุกบรรทัด (จะไม่เหมือนกับ C ที่ใช้ /* และ */ ข้ามบรรทัดได้)

คำสั่ง (Statement)

print "Content-type:text/html\n\n";
print 'Hello world.';

 

ส่วนนี้จะเป็นส่วนของ คำสั่งในภาษา Perl เป็นการสั่งให้โปรแกรม ส่งข้อความว่า "Hello world." ออกมา (ทาง stdout ในที่นี้ ขอทำความตกลงว่า คือ browser) คำสั่งในภาษา Perl จะต้องจบท้ายคำสั่ง ด้วยเครื่องหมาย ; (semicolon) เราจะใช้เครื่องหมาย ; เป็นตัวแยกแต่ละคำสั่งออกจากกัน (ส่วนนี้จะเหมือนกับในภาษา C)

ส่วนบรรทัดบนจะบอก server ว่าผลลัพธ์จะส่งออกมา เป็นข้อมูลชนิด text/html (บรรทัดนี้กับบาง server เช่น hypermart ถ้าไม่ระบุ อาจจะได้ผลลัพธ์เป็น 501 Internal server error ได้)

สรุปท้ายบท - ส่วนประกอบของภาษา Perl

 

  • บรรทัดแรกสุด จะเป็นส่วนที่บอก server ว่าจะใช้โปรแกรม อะไรในการเรียก ใช้โปรแกรมภาษา Perl นี้ให้ทำงาน (เช่น /usr/local/bin/perl สำหรับ hypermart และบาง server)
    • #!/usr/local/bin/perl
  • คำอธิบายโปรแกรม (Comment)
    • คำอธิบายโปรแกรม จะต้องเริ่มต้นด้วยตัวอักษร '#'
  • คำสั่ง
    • แต่ละคำสั่ง จะต้องจบด้วยตัวอักษร ';' แต่ละคำสั่ง จะแยกออกจากกันด้วย ';'

การบ้าน

ทดลองเขียนโปรแกรม แสดงผลลัพธ์ง่ายๆดูซัก 2-3 โปรแกรม หาความแตกต่าง ระหว่าง print 'abc' กับ print "abc " (มีเฉลยในบทต่อๆไป)

 

เนื้อหาส่วนถัดไป.. ->