Perl简易教程2 ---数据类型

数据类型


在介绍数据类型的同时,穿插介绍perl的流程控制。

1.标量

定义:以$加变量名,变量名不能以数字开头。变量值可为整数,浮点数,字符串。

代码

#!/usr/bin/perl
$a = 1 ;
$b = "5";
$c = "how";
print $a;
print $b;
print $c;
print $b+$a;      
print $a.$b;	 # .是字符串的连接符
if( $a == 2 )
{
}
elsif( $b == what )
{
}
else
{
print "nothing\n";
}


输出

how

12

nothing

Ps:输出时连续没换行,为了方便理解,上面面的结果是经过人工换行处理


2.数组

定义:以@开头加变量名。

代码

#!/usr/bin/perl
@numArray = ( 12,23 );
@stringArray = ( "nice","weather");
@mixArrary = ( 12,"notepad" );
$amountArray = $#numArray;    #获得数组元素个数
print $amountArray; 
print $numArray[0];            #数组以O开始
print @numArray;
print @stringArray;
print @mixArrary;
for $value (@stringArray)
{
print $value;
}	 #流程控制都需要用大括号,否则提示出错。

 

输出

1

12

1223

niceweather

12notepad

niceweather

niceweather


ps:输出时连续没换行,为了方便理解,上面结果是经过人工换行处理


3.哈希表

定义:以%加变量名。

代码

#!/usr/bin/perl
%hashOne=
(
"first"=>"k","second"=>"g",);
%hashTwo=
(
first,k,second,g,);   	 #两种申明都可以
$hashTwo{"third"}="w"; #这里需要用到大括号括着key值
while (($key,$value)=(each%hashOne))
{
print "key:$key value:$value\n";
} ##这里可用foreach代替
foreach $key (keys%hashTwo)
{
print "key:$key value:$hashTwo{$key}\n";
}  


输出

key:first value:k

key:second value:g

key:first value:k

key:second value:g

key:third value:w


.

相关文章

1. 如何去重 #!/usr/bin/perl use strict; my %hash; while(...
最近写了一个perl脚本,实现的功能是将表格中其中两列的数据...
表的数据字典格式如下:如果手动写MySQL建表语句,确认麻烦,...
巡检类工作经常会出具日报,最近在原有日报的基础上又新增了...
在实际生产环境中,常常需要从后台日志中截取报文,报文的形...
最近写的一个perl程序,通过关键词匹配统计其出现的频率,让...