1.避免用if，可以用||=，以下$n会被赋值为8，因为$n为0或未定义或空都为假。
perl -E'$n=0;$n||=8'
2.$-可以实现int效果进行取整
perl -E'say$-=2.3*5'
3.打印非空白行
perl -pe'$_ x=/\S/'
4.@{[]}可以把返回的列表给引用，也可以直接内插
echo "a b c d e"|perl -nE'say"Hello @{[split]}."'
5.用Unicode属性来\pL来代替[a-zA-Z] echo 'abcAcd-xyzCZ'|grep -P '\pL'
6.只匹配16进制的数字和字母 [[:xdigit:]]
7.$|布尔
