设为主页 | 加入收藏 | 繁體中文

perl程序设计(七)

  选择性控制布局
  选择性控制布局包罗if和unless语句,类似于C语言中的if。
  首先先容一下真和假的界说。在Perl中,这些规则有些难以理解。控制表
  达式的值为空串或0时,则表达式为假, 对付其它任何环境,表达式的值
  都为真。
  细致:"00"不是空串或0,值为真。"0.0"也是云云。
  指令: if 倘使
  语法一:
  if(判别运算式)
  {
  表达式为真时的语句块;
  }
  上个语法在Perl中也可以写成:
  表达式为真时的语句块 if (判别运算式);
  典范:
  print"请输入您的分数?\n";
  $scorre=; #代表标准输入,会让使用者输入一字符串
  chop($score); #将$score末了一个换行字符\n删除掉
  if($score>=60){
  print"您的分数及格了!\n";
  }
  也可以写成: print "您的分数及格了!\n" if ($score>=60);
  语法二:
  if(判别运算式一){
  判别式一为真时的语句块;
  }else{
  判别式一为假时的语句块;
  }
  典范:
  print"请输入您的分数?\n";
  $scorre=;
  chop($score);
  if($score>=60)
  {
  print"您的分数及格了!\n";
  }else{
  print"您的分数不及格!\n";
  }
  语法三:
  if (判别运算式一)
  {
  判别式一为真时的语句块;
  }elsif(判别运算式二){
  判别式二为真时的语句块;
  }elsif(判别运算式三){
  判别式三为真时的语句块;
  }else{
  所有判别式为假时的语句块;
  }
  典范:
  print"请输入您的分数?\n";
  $scorre=;
  chop($score);
  if($score>60)
  {
  print"您的分数大于60分!\n";
  }elsif ($score<60){
  print"您的分数小于60分!\n":
  }else{
  print"您的分数刚好是60分!\n";
  }
  指令: unless 倘使非
  unless的寄义就是说“如果判别式不为真,就执行...”。
  语法一:
  unless(判别运算式) {
  判别式为假时语句块;
  }
  上个语法在Perl中也可以写成:判别式为假时语句块 unless (判别运算
  式);
  典范:
  print"请输入您的分数?\n";
  $scorre=; #代表标准输入,会让使用者输入一字符串
  chop($score); #将$score末了一个换行字符\n删除掉
  unless($score<60)
  {
  print"您的分数及格了!\n";
  }
  也可以写成: print"您的分数及格了!\n"unless($score<60);
  语法二:
  unless(判别运算式)
  {
  判别式为假时语句块;
  }else{
  判别式为真时语句块;
  }
  典范:
  print"请输入您的分数?\n";
  $scorre=;
  chop($score);
  unless($score<60)
  {
  print"您的分数及格了!\n";
  }else{
  print"您的分数不及格!\n";
  }
  进阶本领:&&,||及?:作为控制布局
  它们看上去像标点符号,或是表达式的一部分。但在Perl中可作为控制结
  构。
  比如说:
  if (判别表达式)
  {为真时语句块};
  也可以写为:
  为真时的语句块 if (判别表达式)
  但更简单的方法是:
  判别式 && 为真时的语句块
  为什么呢?&&为逻辑与操作符,其寄义为:
  若判别式为真,则表达式的值依赖于背面语句块的值。以是为真时的
  语句块被执行(用来求值)。
  若判别式为假,则整个表达式为假,不消考虑背面语句块的值。以是
  为假时的语句块不被执行。
  异样原理,unless(this){that}可替换为this||that。
  ?:表达式举例:exp1?exp2:exp3表现:如果exp1为真则求exp2的值,否则
  求exp3的值。
 


    文章作者: 福州军威计算机技术有限公司
    军威网络是福州最专业的电脑维修公司,专业承接福州电脑维修、上门维修、IT外包、企业电脑包年维护、局域网网络布线、网吧承包等相关维修服务。
    版权声明:原创作品,允许转载,转载时请务必以超链接形式标明文章原始出处 、作者信息和声明。否则将追究法律责任。

TAG:
评论加载中...
内容:
评论者: 验证码: