Perl scalaire

Scalar est un des éléments de données simples.

Scalar peut être un nombre entier, nombres à virgule flottante, des caractères, des chaînes, des paragraphes ou une page complète.

L'exemple suivant montre une application simple scalaire:

#!/usr/bin/perl

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

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

Le programme ci-dessus, le résultat est:

Age = 20
Name = w3big
Salary = 130.5

scalaire numérique

Scalar généralement un nombre ou une chaîne, l'exemple suivant démontre l'utilisation de différents types scalaires numériques:

#!/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";

Le programme ci-dessus, le résultat est:

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

String-scalaire

L'exemple suivant illustre la chaîne scalaire en utilisant différents types de et attention à la différence entre les guillemets simples et doubles:

#!/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";

Le programme ci-dessus, le résultat est:

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

opérations scalaires

L'exemple suivant illustre une opération simple scalaire:

#!/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";

Le programme ci-dessus, le résultat est:

str = helloworld
num = 15
mix = helloworld15

chaînes multi-lignes

Nous pouvons utiliser des guillemets simples pour exporter chaîne multi-lignes, comme suit:

#!/usr/bin/perl

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

print "$string\n";

Le programme ci-dessus, le résultat est:

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

Vous pouvez également utiliser "ici" document de syntaxe à sortie multiples lignes:

#!/usr/bin/perl

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

Le programme ci-dessus, le résultat est:

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

caractères spéciaux

Ci-dessous, nous allons démontrer l'application Perl de caractères spéciaux, tels que __FILE__, __LINE__ et __PACKAGE__ représentent le nom du fichier de script en cours d'exécution, le numéro de ligne, le nom du package.

Ces caractères spéciaux sont tag séparés ne peuvent pas être écrites dans une chaîne, par exemple:

#!/usr/bin/perl

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

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

Le programme ci-dessus, le résultat est:

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

v Chaîne

V un début, suivi d'un ou plusieurs nombres entiers séparés par des périodes, et sera traité comme une chaîne littérale.

Lorsque vous voulez déclarer directement sa valeur numérique pour chaque caractère, chaîne v- fournit une méthode plus claire pour la construction d'une telle chaîne, plutôt que "\ x {1} \ x {14} \ x { 12c} \ x {fa0} "ce n'est pas facile à comprendre, ce que je peux voir les exemples suivants:

#!/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";

Le programme ci-dessus, le résultat est:

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