perl的基本代码

一:

字符串的比较操作符:小于 ----- lt   大于---- gt   小于或等于----le     大于或等于------ge     

<STDIN>:获取用户输入(一行读入知道遇到末尾的换行符为止)

chomp():去掉每行字符串中换行符

循环结构用while

undef值没有赋值的一个标量。(undef作为数字时被视为0,作为字符为空字符)

defined:此函数用来判断某个字符串是undef而不是空字符串

二,列表和数组中的操作符

perl中列表中的索引是从0开始  @表示所有,$表示某一个标量

qw()建立简单的列表(qw:quoted word)

pop和push操作符

删除和新增元素到数组尾端

shift和unshift操作符

删除和新增元素到数组的开头

splice操作符

添加或移除数组中间的某些元素

splice @array ,1,2,@array( or qw(willa))  ##此操作符之多四个参数

@array指要操作的目标数组。

1:要操作数组的索引位置

2:表示要操作的元素

@array( or qw(willa)):要替换的列表

3: $3#array  数组array最后一个元素的索引值 

perl中的默认变量$_

reverse操作符:按相反次序返回该列表

sort操作符:按一定的顺序排序后返回该列表

use strict编译指令

use strict;  #强制使用一些严格的,良好的编程风格(最好写perl代码的时候要写上)  或者是用:use 5.012;

例如:由于perl是一门相当宽松的语言,有时候变量并没有定义,就可以直接用,他并不会显示错误,但是这会造成你写代码时,变量写错了,但是perl却不会报错。

持久性私有变量:state  

use strict;

eg:state $n=0

Noted:state 不能再列表上下文中初始化   

eg:  @array=qw(a,b,c)  #错误

perl中的运算符的基本介绍:http://www.jb51.net/article/34419.htm

原文地址:https://www.cnblogs.com/yupeter007/p/5625199.html