15、Perl 循环控制与特殊变量使用指南

Perl 循环控制与特殊变量使用指南

1. 数字猜测游戏中的测试与计数

在数字猜测游戏里，我们会对用户输入的猜测数字 $guess 进行多项测试：
- 非数字字符 ：检查输入是否包含非数字字符，负数也在此范围内。
- 负数 ：专门检查输入是否为负数。
- 大于 0 ：确保猜测数字是大于 0 的有效数字。
- 小于秘密数字 ：若猜测数字小于秘密数字，输出 “Too low!”。
- 大于秘密数字 ：若猜测数字大于秘密数字，输出 “Too high!”。

如果猜测数字既不是太高也不是太低，并且是有效数字，那么它就是正确答案。此时会发出两次蜂鸣声（使用 \a 转义字符），并输出祝贺消息，脚本结束。同时，我们使用 $count 变量来记录有效猜测的次数，只有在输入为有效数字时才会增加 $count 的值，最后将其作为祝贺消息的一部分输出。

2. 不同类型的循环

在编程中，循环是一种重要的控制结构，用于重复执行特定的代码块。常见的循环类型有 while 循环、 foreach 循环和 for 循环。

2.1 while 循环

while 循环是一种通用