perl 中的unless语句与 perl 中的if 语句正好相反。当给定条件为假时,它执行其体内的语句集。 unless(condition) { statement(s); }PerlCopy unless正文内的语句在条件为假时执行。 示例如下: #!/usr/local/bin/perl printf "Enter any number:"; num = <STDIN>; unless(num>=100) { printf "num is less than 100\n"; }PerlCopy 输出: Enter any number:99 num is less than 100PerlCopy