perl中unless控制结构的学习

2020-02-23 19:47:09

字体：大中小

来源：转载

供稿：网友

在perl的if控制结构中，只有当条件表达式为真时才执行某块代码。如果想让程序块在条件为假时才执行，此时可以把if改成unless，下面跟随武林技术频道的小编一起来看下perl中unless控制结构的学习吧。

例如：

复制代码代码如下:

unless ($fred =~ /^([A-Z_]/w*$/i) {
print "The value of /$fred doesn't look like a Perl identifier name. /n";
}

使用unless意味着，要么条件为真，要么执行某块代码。这就好像使用if控制结构来判断相反的条件。另一种说法是它类似于独立的else子句。也就是说，当看不懂某个unless语句时，可以用如下的if语句来代替：

复制代码代码如下:

if ($fred =~ /^([A-Z_]/w*$/i) {
  //什么都不做
} else {
   print "The value of /$fred doesn't look like a Perl identifier name. /n";
}

如此操作与运行效率高低无关，两种写法应该会被统译成相同的内部字节码。另外一个改写的方法，就是以取反操作符!来否定条件：

复制代码代码如下:

if ( ! ($fred =~ /^([A-Z_]/w*$/i) ) {
  print "The value of /$fred doesn't look like a Perl identifier name. /n";
}

通常应该选择最容易理解的方法来写代码，因为这通常对于维护程序员来说也是最容易理解的。如果用if来表达最合适，那么就这么写也行。但是更多的情况下使用unless能使你的表达更加自然。

unless附带的else子句

其实哪怕是在unless结构中也可以使用else语句，虽然支持这样的语法，但是可能会导致困惑：

复制代码代码如下:

#!/usr/bin/perl -w
unless ($mon =~ /^Feb/) {
  print "This month has at least thirty days./n";
} lese {
  print "Do you see what's going on here?/n";
}
#如果用if语句我们可以写成这样：
if ($mon =~ /^Feb/) {
  print "Do you see what's going on here?/n";
} else {
  print "This month has at least thirty days./n";
}

小编带来的这篇perl中unless控制结构的学习，是不是特别的好，你又充实了一个知识点，更多关于perl的内容，可以多多关注下武林技术频道，我们会不断的更新。

上一篇：Perl 与 Python 之间的一些异同整理

下一篇：perl内置特殊变量的知识点介绍