Perl中控制结构的用法

if控制结构

chomp(my $a = <STDIN>);  用户输入变量$a的值
if($a > 0){  若$a大于0则执行命令
        print "$a is larger than 0\n";
}
elsif($a == 0){  若$a等于0则执行命令
        print "$a equals 0\n";
}
else{  若$a小于0则执行命令
        print "$a is smaller than 0\n";
}

unless控制结构与if作用相反，表示判断为假时执行命令

chomp (my $a = <STDIN>);
unless($a > 0){
        print "$a is not larger than 0\n";
}

while控制结构

$b = 0;  给变量$b赋值为0
while($b < 20){  当$b小于20时则执行循环里的命令
        $b++;
        say "$b";
}

查看本栏目更多精彩内容：http://www.bianceng.cnhttp://www.bianceng.cn/Programming/extra/

while(<>){  始终让用户输入字符串
        if(/fred/){  若输入的字符串中包含"fred"则打印，否则不打印
                print;
        }
}

until控制结构，与while作用相反，当判断为假时执行循环

until(0){
        print "test";
}

foreach控制结构

foreach (1..10){  列表为1到10的数值，并对其进行循环打印
        print "$_\n";
}

foreach $str (qw/hello bye see you/){  对字符串的列表进行循环打印
        print "$str\n";
}

for控制结构，与foreach类似

for ($i=10;$i>0;$i--){  变量$i从10到1循环递减并打印
        print "$i\n";
}

本文出自 “努力为之” 博客，请务必保留此出处http://carllai.blog.51cto.com/1664997/1186224

以上是小编为您精心准备的的内容，在的博客、问答、公众号、人物、课程等栏目也有的相关内容，欢迎继续使用右上角搜索按钮进行搜索字符串
， 结构
， 循环
， 命令
， 控制
， print
， while的用法
， unless
， foreach用法
中foreach用法
perl substr用法、perl grep 用法、perl 1 2 用法、perl e用法、perl 用法，以便于您获取更多的相关知识。