perl常量、多维数组及变量的初始化的实例代码_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获得参数后要检测是否定义,如果么有定义考虑给予默认值。

时间: 2024-10-01 06:08:48

perl常量、多维数组及变量的初始化的实例代码_perl的相关文章

c++程序-我用vector里resize函数创建了一个二维数组,怎么给它排序?代码如下,哪里错了呢?

问题描述 我用vector里resize函数创建了一个二维数组,怎么给它排序?代码如下,哪里错了呢? #include #include #include #include #include using namespace std; int main() { int n, m; cout << "input the row:n and the column:m" << endl; cin >> n >> m; vector< vec

php二维数组合并与元素值相加实例

php教程二维数组合并与元素值相加实例 */ $arr_click = array(     array('date' => '2010-10-01', 'click' =>'1'),     array('date' => '2010-10-02', 'click' =>'2'),     array('date' => '2010-10-02', 'click' =>'3'),     array('date' => '2010-10-03', 'click'

PHP统计二维数组元素个数的方法_php实例

解决思路1. 首先从数据库的congtent字段读取数据,并把它们合并成一个字符串. 复制代码 代码如下: <?php while($myrow = $connector -> fetch_array($result)) {  //$r[] = explode(",", $myrow["content"]);  $str .= $myrow["content"].','; }  $arr_str = substr($str, 0, -

php中二维数组排序问题方法详解_php实例

PHP中二维数组排序,可以使用PHP内置函数uasort() 示例一: 使用用户自定义的比较函数对数组中的值进行排序并保持索引关联 回调函数如下:注意回调函数的返回值是负数或者是false的时候,表示回调函数的第一个参数在前,第二个参数在后排列 $person = array( array('num'=>'001','id'=>6,'name'=>'zhangsan','age'=>21), array('num'=>'001','id'=>7,'name'=>'

php中多维数组按指定value排序的实现代码_php技巧

呵呵,业务需要按多维数组中某个元素进行排序,在PHP中也是非常容易实现的,一个函数调用一个回调函数就搞定了.贴出代码: 复制代码 代码如下: $arr = array(        'index'=>array( 'name'=>'首页','order'=>3),     'intro'=>array( 'name'=>'企业概况','order'=>2),     'news'=>array( 'name'=>'新闻动态','order'=>1 )

在myeclipse中,求java按最短距离的系统聚类法,将一个二维数组按行分成3类的代码,急用!

问题描述 将二维数组的每一行作为一个样本,想将这些样本分为3类.在matlab中可以很方便的用pdist.linkage.cluster函数实现,但是用java小弟编了很长时间一直没有实现,恳请哪位高手告知一下小弟,邮箱xiaoxiaobadi@163.com,急用!万分感谢!

php二维数组用键名分组相加实例函数_php实例

本文介绍一篇关于php 二维数组以某一键名进行分组相加的实例程序,如果是从数据库里取数据的时候大可以SELECT SUM(t_value),t_id FROM t_table GROUP BY t_id,但是如果是在php程序中处理类似的问题就稍微麻烦点了,这里给个函数就是处理类似的问题 复制代码 代码如下: <?php /* 函数功能:对二维数组以某一键名进行分组相加,返回新的二维数组  * 参数说明:$arr-源数组:$new_arr-相加后得到的新数组:$target_key-要分组的键名

php array_multisort 对数组进行排序详解及实例代码_php实例

php 中array_multisort() 函数可以用来一次对多个数组进行排序,或者根据某一维或多维对多维数组进行排序.本文章向大家讲解array_multisort函数的使用方法.  array_multisort() 函数返回排序数组.您可以输入一个或多个数组.函数先对第一个数组进行排序,接着是其他数组,如果两个或多个值相同,它将对下一个数组进行排序. 注释:字符串键名将被保留,但是数字键名将被重新索引,从 0 开始,并以 1 递增. 注释:您可以在每个数组后设置排序顺序和排序类型参数.如

php array_multisort 对数组进行排序详解及实例代码

php 中array_multisort() 函数可以用来一次对多个数组进行排序,或者根据某一维或多维对多维数组进行排序.本文章向大家讲解array_multisort函数的使用方法. array_multisort() 函数返回排序数组.您可以输入一个或多个数组.函数先对第一个数组进行排序,接着是其他数组,如果两个或多个值相同,它将对下一个数组进行排序. 注释:字符串键名将被保留,但是数字键名将被重新索引,从 0 开始,并以 1 递增. 注释:您可以在每个数组后设置排序顺序和排序类型参数.如果