بيرل العددية

العددية هي وحدة بسيطة من البيانات.

يمكن أن يكون العدد عددًا صحيحًا، أو رقمًا عائمًا، أو حرفًا، أو سلسلة، أو فقرة، أو صفحة ويب كاملة.

يوضح المثال التالي الاستخدام البسيط للعدديات:

مثال

#!/usr/bin/Perl $age = 20 ؛ # تعيين عدد صحيح $name = " Codercto " # سلسلة الراتب $ = 130.50 # رقم النقطة العائمة مطبعة " العمر = $ age n " ; " الاسم = $name n " ؛ طباعة " الراتب = $salary n " ;

بتنفيذ البرنامج أعلاه تكون نتيجة الإخراج هي:

 العمر = 20 الاسم = CoderctoSalary = 130.5

العددية الرقمية

عادةً ما يكون العدد العددي رقمًا أو سلسلة. توضح الأمثلة التالية استخدام أنواع مختلفة من الكميات العددية:

مثال

#!/usr/bin/Perl $ عدد صحيح = 200 ؛ $ negative = - 300 ؛ $ float = 200.340 ؛​​​ $octal = 0377 ; # سداسي عشري FF، العدد العشري هو 255 $ hexa = 0 xff ; " عدد صحيح = $عدد صحيح n " ؛ طباعة " سلبي = $ سلبي n " ; " عائم = $ عائم n " ; " bigfloat = $bigfloat n " ; " ثماني = $ octal n " ; " سداسي = $ سداسي n " ;

بتنفيذ البرنامج أعلاه تكون نتيجة الإخراج هي:

 عدد صحيح = 200 سالب = -300 عائم = 200.34 عائم كبير = -1.2e-23 ثماني = 255 سداسي = 255

عددية سلسلة

توضح الأمثلة التالية استخدام أنواع مختلفة من القيم القياسية للسلسلة. انتبه إلى الفرق بين علامات الاقتباس المفردة وعلامات الاقتباس المزدوجة:

مثال

#!/usr/bin/Perl $ var = " String scalar - البرنامج التعليمي للمبرمج ! " ; $ quote = ' أنا في علامات اقتباس مفردة - $ var ' ; مرحبًا بالعالم !​​ " var = $var n " ; " quote = $quote n " ؛ طباعة " مزدوج = $double n " ; " الهروب = $escape n " ;

بتنفيذ البرنامج أعلاه تكون نتيجة الإخراج هي:

 var = String scalar - البرنامج التعليمي للمبرمجين = أنا في علامات اقتباس مفردة - $vardouble = أنا في علامات اقتباس مزدوجة - String scalar - البرنامج التعليمي للمبرمجين = استخدم أحرف الهروب - مرحبًا أيها العالم!

العمليات العددية

يوضح المثال التالي عمليات بسيطة على الكميات القياسية:

مثال

#!/usr/bin/Perl $ str = " مرحبا " . # سلسلة متسلسلة​ $num = 5 + 10 # أضف رقمين $mul = 4 * 5 # ضرب رقمين $mix = $ str . $num ; مطبعة " str = $str n " ; " num = $num n " ; " مزيج = $mix n " ;

بتنفيذ البرنامج أعلاه تكون نتيجة الإخراج هي:

 str = helloworldnum = 15mix = helloworld15

سلسلة متعددة الأسطر

يمكننا استخدام علامات الاقتباس المفردة لإخراج سلاسل متعددة الأسطر كما يلي:

مثال

#!/usr/bin/Perl $string = ' البرنامج التعليمي للمبرمج - لا تتعلم التكنولوجيا فحسب، بل تعلم الأحلام أيضًا! ' ؛ مطبعة " $string n " ؛

بتنفيذ البرنامج أعلاه تكون نتيجة الإخراج هي:

 برنامج تعليمي للمبرمجين - لا تتعلم التكنولوجيا فحسب، بل تعلم الأحلام أيضًا!

يمكنك أيضًا استخدام صيغة المستند "هنا" لإخراج أسطر متعددة:

مثال

#!/usr/bin/Perl طباعة << EOF ;برنامج تعليمي للمبرمجين - لا تتعلم التكنولوجيا فحسب، بل تعلم الأحلام أيضًا! EOF

بتنفيذ البرنامج أعلاه تكون نتيجة الإخراج هي:

 برنامج تعليمي للمبرمجين - لا تتعلم التكنولوجيا فحسب، بل تعلم الأحلام أيضًا!

شخصيات خاصة

سنوضح أدناه تطبيق الأحرف الخاصة في لغة Perl، مثل __FILE__ و__LINE__ و__PACKAGE__، والتي تمثل على التوالي اسم الملف ورقم السطر واسم الحزمة للبرنامج النصي الذي يتم تنفيذه حاليًا.

ملاحظة : __ عبارة عن شرطتين سفليتين، وهناك شرطتان سفليتان قبل وبعد __FILE__ .

هذه الأحرف الخاصة هي رموز منفصلة ولا يمكن كتابتها في سلسلة، على سبيل المثال:

مثال

#!/usr/bin/Perl مطبعة " اسم الملف " . __FILE__​​​​​" رقم السطر " __LINE__​​​​​​" اسم الحزمة " __PACKAGE__​​​​​​مطبعة " __FILE__ __LINE__ __PACKAGE__ n " ;

بتنفيذ البرنامج أعلاه تكون نتيجة الإخراج هي:

 اسم الملف test.pl رقم السطر 4 اسم الحزمة main__FILE__ __LINE__ __PACKAGE__

سلسلة الخامس

يتم التعامل مع السلسلة التي تبدأ بـ v متبوعة بواحد أو أكثر من الأعداد الصحيحة المفصولة بنقاط، على أنها سلسلة حرفية.

عندما تريد الإعلان مباشرة عن القيمة الرقمية لكل حرف، توفر v-string طريقة أنظف لإنشاء مثل هذه السلاسل، على عكس "x{1}x{14}x{ 12c}x{fa0}" من السهل أن نفهم ويمكننا أن ننظر إلى الأمثلة التالية:

مثال

#!/usr/bin/Perl $smile = v9786 ؛ $foo = v102 .111 .111 ؛ $ martin = v77 .97 .114 .116 .105 .110 ؛ " ابتسم = $ smile n " ; " foo = $foo n " ; " مارتن = $مارتن n " ;

بتنفيذ البرنامج أعلاه تكون نتيجة الإخراج هي:

 حرف واسع في الطباعة في سطر test.pl 7.smile = ☺foo = foomartin = Martin