หน้าแรก>บทช่วยสอนการเขียนโปรแกรมเครือข่าย>กวดวิชาภาษาเพิร์ล

ชนิดข้อมูล Perl

ผู้เขียน：Eve Cole เวลาอัปเดต：2025-01-03 13:12:02

Perl เป็นภาษาที่พิมพ์ไม่ชัดเจน ดังนั้นจึงไม่จำเป็นต้องพิมพ์ตัวแปร ล่าม Perl จะเลือกประเภทที่ตรงกันโดยอัตโนมัติตามบริบท

Perl มีข้อมูลพื้นฐานสามประเภท ได้แก่ สเกลาร์ อาเรย์ และแฮช ต่อไปนี้เป็นคำอธิบายของชนิดข้อมูลทั้งสามนี้:

หมายเลขซีเรียล ประเภทและคำอธิบาย
1 สเกลาร์

สเกลาร์เป็นชนิดข้อมูลที่ง่ายที่สุดในภาษา Perl ตัวแปรของประเภทข้อมูลนี้สามารถเป็นตัวเลข สตริง หมายเลขทศนิยม และไม่มีการแยกความแตกต่างที่เข้มงวด เมื่อใช้ ให้เพิ่ม "$" หน้าชื่อตัวแปรเพื่อระบุว่าเป็นสเกลาร์ ตัวอย่างเช่น:

 $myfirst=123; #หมายเลข 123 $mysecond="123"; #String 123
2 อาร์เรย์

ตัวแปรอาร์เรย์เริ่มต้นด้วยอักขระ "@" และดัชนีเริ่มต้นจาก 0 เช่น: @arr=(1,2,3)

 @arr=(1,2,3)
3 กัญชา

แฮชคือชุดของคู่คีย์/ค่าที่ไม่มีการเรียงลำดับ สามารถรับค่าได้โดยใช้คีย์เป็นตัวห้อย ตัวแปรแฮชเริ่มต้นด้วยอักขระ "%"

 %h=('a'=>1,'b'=>2); %h=('a'=>1,'b'=>2);

ตัวอักษรตัวเลข

1. บูรณาการ

จริงๆ แล้ว PERL เก็บจำนวนเต็มไว้ในรีจิสเตอร์จุดลอยตัวในคอมพิวเตอร์ของคุณ ดังนั้นจึงถือเป็นจำนวนจุดลอยตัวจริงๆ

ในคอมพิวเตอร์ส่วนใหญ่ รีจิสเตอร์ทศนิยมสามารถจัดเก็บได้ประมาณ 16 หลัก และตัวเลขที่ยาวกว่านี้จะถูกละทิ้งไป จริงๆ แล้วจำนวนเต็มเป็นกรณีพิเศษของจำนวนจุดลอยตัว

ตัวแปรจำนวนเต็มและการดำเนินการ:

 $x = 12345;if (1217 + 116 == 1333) { # ดำเนินการบล็อกคำสั่งโค้ด}

เลขฐานแปดและเลขฐานสิบหก: เลขฐานแปดเริ่มต้นด้วย 0 และเลขฐานสิบหกเริ่มต้นด้วย 0x ตัวอย่างเช่น:

 $var1 = 047; # เท่ากับ 39 เป็นทศนิยม $var2 = 0x1f; # เท่ากับ 31 เป็นทศนิยม

2. ตัวเลขทศนิยม

ข้อมูลจุดลอยตัว เช่น 11.4, -0.3, .3, 3., 54.1e+02, 5.41e03

รีจิสเตอร์ทศนิยมมักจะไม่สามารถจัดเก็บตัวเลขทศนิยมได้อย่างแม่นยำ ส่งผลให้เกิดข้อผิดพลาด ควรให้ความสนใจเป็นพิเศษกับการดำเนินการและการเปรียบเทียบ ดัชนีมักจะอยู่ในช่วงตั้งแต่ -309 ถึง +308

ตัวอย่าง

#!/usr/bin/perl $ value = 9.01 อี + 21 + 0.01 - 9.01 อี + 21 ; ( " ค่าแรกคือ: " , $value , " n " ) ; $ value = 9.01 e + 21 - 9.01 e + 21 + 0.01 ; ( " ค่าที่สองคือ: " , $value , " n " ) ;

เมื่อรันโปรแกรมข้างต้น ผลลัพธ์ที่ได้คือ:

 ค่าแรกคือ: 0 ค่าที่สองคือ: 0.01

3. เชือก

สตริงในภาษา Perl จะแสดงด้วยสเกลาร์ และวิธีการกำหนดจะคล้ายกับวิธีการในภาษา C มาก อย่างไรก็ตาม สตริงในภาษา Perl ไม่ได้ลงท้ายด้วย 0

ความแตกต่างระหว่างเครื่องหมายคำพูดคู่ Perl และเครื่องหมายคำพูดเดี่ยว: เครื่องหมายคำพูดคู่สามารถแยกวิเคราะห์อักขระยกเว้นและตัวแปรบางตัวได้ตามปกติ ในขณะที่เครื่องหมายคำพูดเดี่ยวไม่สามารถแยกวิเคราะห์ได้และจะถูกส่งออกตามที่เป็นอยู่

แต่สามารถใช้ข้อความหลายบรรทัดได้เมื่อกำหนดด้วยเครื่องหมายคำพูดเดี่ยว เช่นนี้

 #!/usr/bin/perl $var='นี่คือตัวอย่างของการใช้ข้อความสตริงหลายบรรทัด';print($var);

เมื่อรันโปรแกรมข้างต้น ผลลัพธ์ที่ได้คือ:

 นี่คือตัวอย่างการใช้ลิเทอรัลสตริงแบบหลายบรรทัด

อักขระหลีกที่ใช้กันทั่วไปบางตัวในภาษา Perl จะแสดงอยู่ในตารางต่อไปนี้:

ตัวละครหลบหนี ความหมาย
- แบ็กสแลช
- คำพูดเดียว
- เครื่องหมายคำพูดคู่
ก วงแหวนของระบบ
ข แบ็คสเปซ
ฉ ฟีดแบบฟอร์ม
n ขึ้นบรรทัดใหม่
r เข้า
t แท็บแนวนอน
v แท็บแนวตั้ง
nn สร้างตัวเลขในรูปแบบฐานแปด
xnn สร้างตัวเลขในรูปแบบเลขฐานสิบหก
cX อักขระควบคุม x สามารถเป็นอักขระใดก็ได้
u บังคับให้อักขระตัวถัดไปเป็นตัวพิมพ์ใหญ่
ล บังคับให้อักขระตัวถัดไปเป็นตัวพิมพ์เล็ก
U บังคับให้อักขระทั้งหมดเป็นตัวพิมพ์ใหญ่
ล บังคับให้อักขระทั้งหมดเป็นตัวพิมพ์เล็ก
คิว เพิ่มแบ็กสแลชให้กับอักขระที่ไม่ใช่คำจนถึง E
E สิ้นสุด L, U, Q

ตัวอย่าง

ต่อไป มาดูการใช้เครื่องหมายคำพูดเดี่ยว เครื่องหมายคำพูดคู่ และอักขระหลีกโดยละเอียด:

ตัวอย่าง

#!/usr/bin/perl #Newlinen อยู่ภายในเครื่องหมายคำพูดคู่และถูกต้อง $str = " บทช่วย สอน การเขียนโค้ด n www.codercto.com " ; " $str n " ; # Newlinen อยู่ในเครื่องหมายคำพูดเดี่ยวและไม่ถูกต้อง $str = ' บทช่วย สอน การเขียนโค้ดnwww.codercto.com ' ; " $str n " ; # เฉพาะ R เท่านั้นที่จะถูกแปลงเป็นตัวพิมพ์ใหญ่ $ str = " ucodercto " ; " $str n " ; # ตัวอักษรทั้งหมดจะถูกแปลงเป็นตัวพิมพ์ใหญ่ $ str = " Ucodercto " ; " $str n " ; # ส่วนที่ระบุจะถูกแปลงเป็นตัวพิมพ์ใหญ่ $str = " ยินดี ต้อนรับ สู่ UcoderctoE.com! " ; " $str n " ; # เพิ่มแบ็กสแลชให้กับอักขระที่ไม่ใช่คำจนถึง E $str = " Qยินดี ต้อนรับ สู่ครอบครัวของ codercto " ; " $str n " ;
บทความที่เกี่ยวข้อง