perl常量、多维数组及变量的初始化的实例代码
更新时间：2013年02月09日 20:33:18 作者：
perl常量、多维数组及变量的初始化的例子，供大家学习参考
例1：
复制代码 代码如下:
#!/usr/bin/perl
use strict;
use warnings;
my $test = "asdf";
print "${test}_test2\n";
#constant
use constant {
AAA => "aaa",
BBB=> "bbb",
MIN_TOTAL => 12,
SCORE_PASS => 90,
SCORE_RED => 70,
};
print AAA;
print SCORE_PASS;
#two dimesion arrays
my @steps = (
["aaa", "aaavalue"],
["bbb","bbbvalue"],
["ccc","cccvalue"]
);
print "\n";
foreach my $i (0 .. $#steps){
print "$steps[$i][0]:$steps[$i][1]\n";
}
代码2：
复制代码 代码如下:
my $a1;
print "$a1\n";
my $a2 = undef;
print "$a2\n";
if(!defined($a1)){print "a1 is not defined\n";}
if(!$a2){print "a2 is not defined\n";}
my $a3='';
if(!$a3){print "a3 is empty string\n";}
在定义变量时一定要初始化，或者在使用时判断是否defined，很多的时候还需要判断是否为空字符串。 特别是在使用getopt::long或cgi->query获得参数后要检测是否定义，如果么有定义考虑给予默认值。
相关文章
这篇文章主要介绍了Perl实现遍历目录例子,本文示例运行在Windows系统下,而且需要gbk编码,需要的朋友可以参考下2014-12-12
这篇文章主要介绍了Perl AnyEvent中的watcher实例,关于AnyEvent请参阅的更多介绍请参阅文中的相关链接,需要的朋友可以参考下2014-09-09
今天小编就为大家分享一篇关于Perl5和Perl6对比使用Sigils的差别，小编觉得内容挺不错的，现在分享给大家，具有很好的参考价值，需要的朋友一起跟随小编来看看吧2018-09-09
有时候我们需要从文件中读取字符串，这里简单介绍下， 需要的朋友可以参考下2013-02-02
这篇文章主要介绍了Perl学习笔记之CPAN使用介绍,本文讲解了什么是CPAN、CPAN的目录作用介绍、CPAN安装Perl Module的两种方法等内容,需要的朋友可以参考下2015-06-06
这篇文章主要介绍了About Perl（翻译Perl官网介绍）,本文翻译自Perl官网介绍,讲解什么是Perl、Perl的历史、Perl 5 特征、Perl在WEB环境下的使用等内容,需要的朋友可以参考下2015-06-06
perl中的my可以来定义私有变量，可以在很多情况下防止错误的发生2013-02-02
Perl文件读取的经典用法，有需要的朋友可以参考下2013-02-02
本文给大家分享的是使用perl生成随机密码的方法示例，而且可以通过参数来控制密码中包含的字符种类，非常的不错，有需要的小伙伴可以参考下2016-06-06
这篇文章主要介绍了perl中的范围声明our-my-local介绍,这3个关键字都是控制变量范围的,需要的朋友可以参考下2015-02-02
最新评论