赞
踩
Perl 是一种解释型的高级脚本语言,广泛用于文本处理、系统管理任务等。
#
注释代码。{}
。$
符号声明标量变量。my $greeting = "Hello, Perl!";
### 2.2 数组变量(@array)
- 使用 `@` 符号声明数组变量。
```perl
my @fruits = ("Apple", "Banana", "Cherry");
%
符号声明哈希变量。my %fruit_colors = ("Apple" => "Red", "Banana" => "Yellow", "Cherry" => "Red");
scalar
函数将数组或哈希转换为标量。my $array_scalar = scalar @fruits; # 返回数组元素的数量
+
, -
, *
, /
。my $sum = 10 + 5;
my $difference = 10 - 5;
my $product = 10 * 5;
my $quotient = 10 / 5;
=
和算术赋值操作符 +=
, -=
。my $number = 10;
$number += 5; # 等价于 $number = $number + 5
==
和不等 !=
。if ($number == 15) {
print "The number is fifteen.\n";
}
if
和 unless
进行条件判断。if ($number == 15) {
print "The number is fifteen.\n";
} elsif ($number < 15) {
print "The number is less than fifteen.\n";
} else {
print "The number is greater than fifteen.\n";
}
while
循环。my $count = 0;
while ($count < 5) {
print "Count is $count\n";
$count++;
}
for
循环。for my $i (1..5) {
print "Number is $i\n";
}
正则表达式用于模式匹配,是 Perl 的核心特性之一。
//
定义。my $string = "Hello, World!";
if ($string =~ /World/) {
print "Found 'World' in the string.\n";
}
s///
。my $new_string = $string;
$new_string =~ s/World/Perl/;
print $new_string; # 输出 "Hello, Perl!"
Copyright © 2003-2013 www.wpsshop.cn 版权所有,并保留所有权利。