بيرل العددية

عددي هو عناصر البيانات بسيطة.

عددي يمكن أن يكون صحيحا، أرقام النقطة العائمة، وشخصيات، الجمل، الفقرات أو صفحة كاملة.

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

#!/usr/bin/perl

$age = 20;             # 整数赋值
$name = "w3big";   # 字符串
$salary = 130.50;     # 浮点数

print "Age = $age\n";
print "Name = $name\n";
print "Salary = $salary\n";

البرنامج المذكور أعلاه، والناتج هو:

Age = 20
Name = w3big
Salary = 130.5

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

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

#!/usr/bin/perl

$integer = 200;
$negative = -300;
$floating = 200.340;
$bigfloat = -1.2E-23;

# 八进制 377 , 十进制为 255 
$octal = 0377;

# 十六进制 FF, 十进制为 255 
$hexa = 0xff;

print "integer = $integer\n";
print "negative = $negative\n";
print "floating = $floating\n";
print "bigfloat = $bigfloat\n";
print "octal = $octal\n";
print "hexa = $hexa\n";

البرنامج المذكور أعلاه، والناتج هو:

integer = 200
negative = -300
floating = 200.34
bigfloat = -1.2e-23
octal = 255
hexa = 255

سلسلة العددية

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

#!/usr/bin/perl

$var = "字符串标量 - 本教程!";
$quote = '我在单引号内 - $var';
$double = "我在双引号内 - $var";

$escape = "转义字符使用 -\tHello, World!";

print "var = $var\n";
print "quote = $quote\n";
print "double = $double\n";
print "escape = $escape\n";

البرنامج المذكور أعلاه، والناتج هو:

var = 字符串标量 - 本教程!
quote = 我在单引号内 - $var
double = 我在双引号内 - 字符串标量 - 本教程!
escape = 转义字符使用 -	Hello, World!

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

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

#!/usr/bin/perl

$str = "hello" . "world";       # 字符串连接
$num = 5 + 10;                  # 两数相加
$mul = 4 * 5;                   # 两数相乘
$mix = $str . $num;             # 连接字符串和数字

print "str = $str\n";
print "num = $num\n";
print "mix = $mix\n";

البرنامج المذكور أعلاه، والناتج هو:

str = helloworld
num = 15
mix = helloworld15

سلاسل خط متعددة

يمكننا استخدام علامات الاقتباس المفردة لتصدير سلسلة متعدد الخطوط، على النحو التالي:

#!/usr/bin/perl

$string = '
本教程
	—— 学的不仅是技术，更是梦想！
';

print "$string\n";

البرنامج المذكور أعلاه، والناتج هو:

本教程
	—— 学的不仅是技术，更是梦想！

يمكنك أيضا استخدام "هنا" جملة الوثيقة إلى عدة أسطر الإخراج:

#!/usr/bin/perl

print <<EOF;
本教程
	—— 学的不仅是技术，更是梦想！
EOF

البرنامج المذكور أعلاه، والناتج هو:

本教程
	—— 学的不仅是技术，更是梦想！

أحرف خاصة

أدناه سوف نظهر تطبيق بيرل من أحرف خاصة، مثل __FILE__، __LINE__، و__PACKAGE__ تمثل اسم الملف النصي تنفذ حاليا، رقم السطر، اسم الحزمة.

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

#!/usr/bin/perl

print "文件名 ". __FILE__ . "\n";
print "行号 " . __LINE__ ."\n";
print "包名 " . __PACKAGE__ ."\n";

# 无法解析
print "__FILE__ __LINE__ __PACKAGE__\n";

البرنامج المذكور أعلاه، والناتج هو:

文件名 test.pl
行号 4
包名 main
__FILE__ __LINE__ __PACKAGE__

الخامس سلسلة

V بداية، تليها واحدة أو أكثر من الأعداد الصحيحة مفصولة فترات، وسوف يعامل كسلسلة حرفية.

عندما كنت تريد أن تعلن مباشرة قيمتها العددية لكل حرف، توفر سلسلة الخامس وسيلة أكثر وضوحا لبناء مثل هذه السلسلة، بدلا من "\ س {1} \ س {14} \ س { 12C} \ س {fa0} "هذا ليس من السهل أن نفهم، ما أستطيع أن أرى الأمثلة التالية:

#!/usr/bin/perl

$smile  = v9786;
$foo    = v102.111.111;
$martin = v77.97.114.116.105.110; 

print "smile = $smile\n";
print "foo = $foo\n";
print "martin = $martin\n";

البرنامج المذكور أعلاه، والناتج هو:

Wide character in print at test.pl line 7.
smile = ☺
foo = foo
martin = Martin