perl_学习笔记_条件语句和循环语句

#!/usr/bin/perl -w
print 2**4;
#创建对跟随其后项目的引用符号:\
$variable=5;
$reference=\$variable;
print "\n" . $$reference ."\n" ;
#绑定运算符：=~ 和 ！=
#=~：将标量表达式绑定到模式匹配上
#=!:与运算符=~相似，不同的是它的返回值是负数。
#用use integer模块强迫perl使用整数除法


use integer;
print 16/3 ."\n";


#当从数字中连续剥离数位进行两种基数转换时，使用取模运算能减少操作：
$value=257;
while($value){
push @digits , (0..9,a..f)[$value%16];
$value /=16;
}
while(@digits){
print pop @digits;
}
print "\n";
#从整数末端获取数字位的方法，可用:&
print 24 &15 ."\n";


#一元运算符：不将参数放在园括号中时，perl将注入sqrt、defined、eval、return、chdir、rmdir、oct、hex、undef、exists和其他只接受一个标量的函数。
#如果想要在某个特定的十进制位精度上比较浮点数，使用：sprintf函数
#unless语句：当条件为假时才执行相关模块的代码。
#unless（EXPR）BLOCK
#unless（EXPR） BLOCK else BLOCK
#使用foreach变量：
#foreach var(LIST) BLOCK;
#foreach循环中的循环变量回过头去访问表中的实际元素，这意味着如果修改循环变量，这些修改了相应的表元素。
#map函数的工作：map:BLOCK LIST;  或者map:EXPR,LIST;
#PS:map是在表上下文下对BLOCK和EXPR进行计算，所以LIS