[转 - 改] Perl初级教程 (二)
来源:互联网 发布:linux 网络配置文件 编辑:程序博客网 时间:2024/05/16 01:20
【对于字符串】
$b = 'BB';
$c = 'CC';
$a = 'AA';
$a = $b . $c; # Concatenate $b and $c = BBCC
$a = $b x $c; # $b repeated $c times
【Perl的赋值语句】
$a = $b; # Assign $b to $a
$a += $b; # Add $b to $a (算数运算)
$a -= $b; # Subtract $b from $a
$a .= $b; # Append $b onto $a (字符运算)
【 互操作性】
$b = 'Pear';
$c = 'CC';
$a = 'Apple';
print $a.' and '.$b;
print "\n"; # 制表符(\t) 换行(\n)
print '$a and $b';
print "\n";
print "$a and $b";
【数组变量】
数组通过以0开始的索引进行访问,方括号内为索引值
@List = ("1",2,'3');
print @List;
> 123
【 数组 赋值/删减】
@List = ("1",2,'3',"Array");
@array = (5..15); #序列化列表5~15;print @List;
print "\n";
print @array;
>123Array
56789101112131415
# push Statement.
push(@List,"Added");
print @List;
print "\n";
push(@List,@array);
print @List;
>123Array
123Array56789101112131415
# pop Statement.
@List = ("1",2,'3',"Array");
@array = (5..15);
push(@List,@array);
$e = pop(@List);
$f = pop(@List);
print $f;
print "\n";
print @List;
print "\n";
$f = @List;
print $f;
> 14
123Array568910111213
13
# 数组也可以用来为多个标量进行赋值
@List = ("1",2,'3',"Array");
@array = (5..15);
push(@List,@array);
$e = pop(@List);
$f = pop(@List);
print "\n";
print $e;
print "\n";
print $f;
print "\n";
($e,$f,$a) = @List; # 按照数组顺序项给变量赋值。
print "\n";
print $e;
print "\n";
print $f;
print "\n";
print $a;
> 15
14
1
2
3
# 最后,你可能想知道列表中最后一个元素的索引值,可以用这个表达式:
print $#List;
> 12;
($a, $b) = ($c, $d); # Same as $a=$c; $b=$d;
($a, $b) = @food; # $a and $b are the first two items of @food.
($a, @somefood) = @food; # $a is the first item of @food , @somefood is a list of the others.
(@somefood, $a) = @food; # @somefood is @food and $a is undefined.
- [转 - 改] Perl初级教程 (二)
- [转 - 改] Perl初级教程 (一)
- [转 - 改] Perl初级教程 (三)
- [转 - 改] Perl初级教程 (四)
- 摇滚初级教程(二)
- iOS初级教程(二)
- Perl DBI 初级教程
- Perl初级教程[第1天]
- Perl初级教程[第2天]
- Perl初级教程[第3天]
- Perl初级教程[第4天]
- Perl学习(二)
- perl笔记(二)
- 一步一步学iReport + JasperReports(二) :JasperReport初级教程(2.0.3)图文详解(转)
- XML 初级教程(二)
- celery初级教程(二)
- Perl初级教程 (5) 遍历文件夹内指定扩展名文件,查找匹配关键字的输出。
- Django 1.7 初级教程or学习笔记(二)
- 使用 Windows service 访问域管理
- 访问 远程机 盘符 设置
- SQL Server 汉字 问号
- 解决 NET FTP Response error: (503) .
- [转 - 改] Perl初级教程 (一)
- [转 - 改] Perl初级教程 (二)
- 数学英语词汇
- [转 - 改] Perl初级教程 (三)
- SQL2008 T-SQL Note
- [转 - 改] Perl初级教程 (四)
- 解决 SQL Server Web Service is not configured.
- SQL Server DBCC & Count (*) Count(1) ,Select Count(column)
- UNIX - Perl 批处理。
- UNIX-Perl-Uninstall