条件操作符?:|建立二维数组的简洁形式

weixin_41699511

于 2019-06-20 09:00:40 发布

阅读量184

点赞数

CC 4.0 BY-SA版权

分类专栏： perl 文章标签： perl

本文链接：https://blog.youkuaiyun.com/weixin_41699511/article/details/92962723

perl 专栏收录该内容

17 篇文章

订阅专栏

博客虽未给出具体内容，但标签显示与Perl相关。Perl是后端开发领域的一种编程语言，在信息技术中有一定应用。

摘要生成于 C知道，由 DeepSeek-R1 满血版支持，前往体验 >

#!/usr/bin/perl

use strict;
use warnings;

my @arr;

foreach(1..4)
{
    push @arr,[0,0,0,0];
}
my ($i,$j);

for($i=0;$i<5;$i++)
{
    for($j=0;$j<5;$j++)
    {
        print "$arr[$i][$j]\n";
    }
}

#push @arr,[(0) x 4]foreach 1..4

my $change=3;my $b=4;

$change=$b==0 ? 'first':'end';print "\$change=$change,\$b=$b\n";

#$change=end,$b=4

my $n = '';$n = $n-2;print "$n\n";

#-2

my $m = 0;$n = $m == 0? 'null == 0':'null != 0';print "$n\n";