Perl Numbers

วิธีการตรวจสอบอย่างง่ายว่า ตัวแปรมี `ค่าที่เป็นตัวเลข` ใน Perl

เมื่อทำงานกับตัวแปรใน Perl การเข้าใจประเภทข้อมูลของพวกมันเป็นสิ่งสำคัญ ความต้องการทั่วไปที่นักพัฒนาต้องเผชิญคือการตรวจสอบว่าตัวแปรที่กำหนดมีค่าที่เป็นตัวเลขหรือไม่ ด้วยความยืดหยุ่นของ Perl สิ่งนี้อาจไม่ตรงไปตรงมาอย่างที่คิด หากคุณเคยถามตัวเองว่า “ฉันจะบอกได้อย่างไรว่าตัวแปรมีค่าที่เป็นตัวเลขใน Perl?” คุณไม่ได้อยู่คนเดียว โชคดีที่มีวิธีการที่ง่ายและมีประสิทธิภาพสำหรับปัญหานี้โดยไม่จำเป็นต้องลงลึกไปถึงโครงสร้างที่ซับซ้อน

ปัญหา: การระบุค่าตัวเลข

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

การใช้การตรวจสอบแบบทั่วไปอาจนำไปสู่เซอร์ไพรส์ โดยเฉพาะเมื่อการจัดการประเภทของ Perl ทำงานแบบหลวมๆ ส่งผลให้เกิดคำเตือนหากคุณใช้ -w ดังนั้น คุณต้องมีวิธีที่เชื่อถือได้ในการระบุค่าตัวเลขโดยไม่ทำให้เกิดคำเตือนในโค้ดของคุณ

วิธีการ: การใช้ `Scalar::Util::looks_like_number()`

เพื่อระบุอย่างมีประสิทธิภาพว่าตัวแปรมีค่าที่เป็นตัวเลขใน Perl หรือไม่ คุณสามารถใช้โมดูล Scalar::Util ซึ่งมีฟังก์ชันย่อยที่เรียกว่า looks_like_number() ฟังก์ชันนี้ใช้การทำงานภายในของ Perl เพื่อตรวจสอบประเภทของตัวแปรที่ส่งให้ ทำให้มั่นใจในประสิทธิภาพและความเชื่อถือได้

ขั้นตอนในการใช้ `looks_like_number()`

รวมโมดูลที่จำเป็น: คุณจะต้องใช้โมดูล Scalar::Util ในสคริปต์ Perl ของคุณ
เรียกใช้ฟังก์ชัน: ใช้ looks_like_number($variable) เพื่อตรวจสอบว่าตัวแปรเป็นตัวเลขหรือไม่

ตัวอย่างโค้ด

นี่คือตัวอย่างการใช้งานจริงเพื่อแสดงวิธีการนำไปใช้ในสคริปต์ Perl ของคุณ:

#!/usr/bin/perl

use warnings;
use strict;
use Scalar::Util qw(looks_like_number);

my @exprs = qw(1 5.25 0.001 1.3e8 foo bar 1dd inf infinity);

foreach my $expr (@exprs) {
    print "$expr is", looks_like_number($expr) ? '' : ' not', " a number\n";
}

ผลลัพธ์ที่คาดหวัง

เมื่อคุณรันโค้ดข้างต้น คุณจะได้รับผลลัพธ์ดังนี้:

1 is a number
5.25 is a number
0.001 is a number
1.3e8 is a number
foo is not a number
bar is not a number
1dd is not a number
inf is a number
infinity is a number

ผลลัพธ์ที่ชัดเจนนี้ช่วยให้คุณเห็นว่าค่าตไหนบ้างที่ถือว่ามีค่าตัวเลข

ทำไมต้องใช้ `looks_like_number()`?

ประสิทธิภาพ: มันตรวจสอบได้อย่างมีประสิทธิภาพว่าข้อมูลของ scalar ดูเหมือนตัวเลขโดยใช้ฟังก์ชันการทำงานในตัว
ไม่มีคำเตือน: มันทำงานโดยไม่สร้างคำเตือน (ด้วยธง -w) เนื่องจากการจัดการประเภทข้อมูลที่ระมัดระวัง
จัดการกรณีขอบ: มันสามารถรับรู้การแทนค่าตัวเลขพิเศษเช่น inf และ infinity

แหล่งข้อมูลเพิ่มเติม

สำหรับการอ่านเพิ่มเติม คุณสามารถสำรวจแหล่งข้อมูลต่อไปนี้:

perldoc Scalar::Util
perldoc perlapi สำหรับข้อมูลเชิงเทคนิคเพิ่มเติมเกี่ยวกับ looks_like_number

สรุป

การตรวจสอบว่าตัวแปรใน Perl มี ค่าที่เป็นตัวเลข ถือเป็นสิ่งสำคัญสำหรับแนวทางการเขียนโปรแกรมที่แข็งแกร่ง การใช้ Scalar::Util::looks_like_number() มอบวิธีการที่ตรงไปตรงมาและมีประสิทธิภาพในการทำภารกิจนี้ ช่วยให้นักพัฒนาสามารถมุ่งเน้นไปที่การดำเนินการทางตรรกะของพวกเขาแทนที่จะต้องกังวลเกี่ยวกับประเภทข้อมูล อย่าลืมรวมฟังก์ชันนี้ในสคริปต์ Perl ในอนาคตของคุณเพื่อเพิ่มความเชื่อถือได้และความถูกต้องของโค้ดของคุณ

วิธีการตรวจสอบอย่างง่ายว่า ตัวแปรมี ค่าที่เป็นตัวเลข ใน Perl