perl学习笔记<1>
|*********************************|
|************* 变量 **************|
|*********************************|
Perl注释:
整段注释:
1.=cut;....;=cut;
2.=head;....;=cut;
3.<<TXT;....;TXT
(注释代码前面不能有空格)
单行注释:
#
#用字符a做实例;
变量定义:$a; //标量变量a;
特殊变量"$_"(尽量少用该变量);
字符串连接符"."(点号);
例如:
$a = "hello!";
$b = "girl.";
$c = $a.$b;
$c的值为:hello!girl.
print的使用中,使用单引号',和使用双引号的"区别,例如:
$a = "good";
print "Thisis$a!";//结果为:Thisisgood!
print 'Thisis$a!'; //结果为:Thisis$a!
其他部分运算符举例:
运算符 用法举例 结果
int int(5.6234) 返回它的参数的整数部分(5)。
length length("nose") 返回它的字符串参数的长度(4)。
lc lc("METOO") 返回它的转换成小写字母的参数("metoo")
uc uc("hal9000") 返回与lc相反的参数值("HAL9000")
cos cos(50) 返回弧度50的余弦值(.964966)
rand rand(5) 返回从0到小于该参数值之间的一个随机数字。如果该参数被省
略,则返回0至1之间的一个数字
<STDIN>表示从键盘读取的信息,直到输入回车为止(输入的字符中包含回车符);
$a = <STDIN>;
print "You enter str is $a";
用chomp可以删除其参数中结尾的任何换行符,例如:
chomp $a;
|*********************************|
|************* 数组 **************|
|*********************************|
数组定义:@a; //标量数组a;
@a = qw(x y z); 和 @a = ('x','y','z');实现结果相同;
$a = qw(x y z); 则打印最后一个字符z;
获得整个数组内容:
print "@a"; //将打印出xyz;
打印数组中的某一元素的值语法:
print $a[0]; //打印x;