Perl数组是一个变量,用于存储标量值的有序列表。数组变量前面有一个“ @”符号。要引用数组的单个元素,将使用带符号名称的美元符号($),后跟方括号中的元素索引。
这是使用数组变量的简单示例-
#!/usr/bin/perl @ages = (25, 30, 40); @names = ("John Paul", "Lisa", "Kumar"); print "\$ages[0] = $ages[0]\n"; print "\$ages[1] = $ages[1]\n"; print "\$ages[2] = $ages[2]\n"; print "\$names[0] = $names[0]\n"; print "\$names[1] = $names[1]\n"; print "\$names[2] = $names[2]\n";
在这里,我们仅在$符号之前使用了转义符号(\)进行打印。其他Perl会将其理解为变量并打印其值。执行后,将产生以下结果-
输出结果
$ages[0] = 25 $ages[1] = 30 $ages[2] = 40 $names[0] = John Paul $names[1] = Lisa $names[2] = Kumar