- Perl 基础知识
- Perl - 主页
- Perl - 简介
- Perl - 环境
- Perl - 语法概述
- Perl - 数据类型
- Perl - 变量
- Perl - 标量
- Perl - 数组
- Perl - 哈希
- Perl - IF...ELSE
- Perl - 循环
- Perl - 运算符
- Perl - 日期和时间
- Perl - 子例程
- Perl - 参考资料
- Perl - 格式
- Perl - 文件 I/O
- Perl - 目录
- Perl - 错误处理
- Perl - 特殊变量
- Perl - 编码标准
- Perl - 正则表达式
- Perl - 发送电子邮件
- Perl 高级
- Perl - 套接字编程
- Perl - 面向对象
- Perl - 数据库访问
- Perl - CGI 编程
- Perl - 包和模块
- Perl - 流程管理
- Perl - 嵌入式文档
- Perl - 函数参考
- Perl 有用资源
- Perl - 问题与解答
- Perl - 快速指南
- Perl - 有用的资源
- Perl - 讨论
Perl while 循环
Perl 编程语言中的while循环语句只要给定条件为真,就会重复执行目标语句。
句法
Perl 编程语言中while循环的语法是 -
while(condition) { statement(s); }
这里的语句可以是单个语句或语句块。条件可以是任何表达式。当条件为真时,循环会迭代。当条件变为假时,程序控制将传递到紧随循环后面的行。
数字 0、字符串 '0' 和 "" 、空列表 () 和 undef在布尔上下文中都是false ,所有其他值都是true。否定真值!or not返回一个特殊的 false 值。
流程图
这里while循环的关键点是循环可能永远不会运行。当条件测试结果为假时,将跳过循环体并执行 while 循环后的第一条语句。
例子
#!/usr/local/bin/perl $a = 10; # while loop execution while( $a < 20 ) { printf "Value of a: $a\n"; $a = $a + 1; }
这里我们使用比较运算符 < 将变量 $a 的值与 20 进行比较。因此,当 $a 的值小于 20 时,while循环会继续执行它旁边的代码块,并且一旦 $a 的值变为等于20,就出来了。执行时,上面的代码产生以下结果 -
Value of a: 10 Value of a: 11 Value of a: 12 Value of a: 13 Value of a: 14 Value of a: 15 Value of a: 16 Value of a: 17 Value of a: 18 Value of a: 19
perl_loops.htm