Perl 一个简单 perl 程序的求教 (二)
#! perl print "请输入任意一个小于 10 的整数:\n"; $count = ; if($count < 10){ print "输出结果为：\n"; while($count < 10){ print "$count\n"; $count++; } } else{ print "请确认输入的数字为小于 10 的整数。\n"; }
[attach] 1204[/attach]
北京 - 恐龙 14:24:02 你试试 输入 6 北京 - 恐龙 14:24:09 那么 6 和 7 之间也有 北京 - 恐龙 14:24:14 这个空格 北京-xiaoxiang 14:24:20 嗯 珠海 - 虚拟人生 14:24:26 这题目有意思，有点想高中编程题 北京-xiaoxiang 14:24:38 输啥都有。没看出来哪里有问题 北京-laofo 14:25:20 论坛发贴 北京-xiaoxiang 14:25:46 早发了。。。。。。 没人理，才在群里叫的 珠海 - 虚拟人生 14:25:53 会不会你输完第一个数之后，把你输完数之后的回车也带进去了？ 北京-xiaoxiang 14:26:02 http://bbs.scmroad.com/viewthread.php? %3D1 珠海 - 虚拟人生 14:26:07 0d0a 长春 - 初学者 14:26:16 $count = 5\n 长春 - 初学者 14:26:27 输入的时候 长春 - 初学者 14:26:51 之后 ++ 的时候带走了 珠海 - 虚拟人生 14:27:08 对，楼上的专家也发现了 长春 - 初学者 14:27:26 专家。。。低调低调 北京-xiaoxiang 14:27:50 没太明白 北京-xiaoxiang 14:28:28 不过把 $count++ 提前一句确实就没空格了，shit 长春 - 初学者 14:30:28 ++ 会把\n 消灭 长春 - 初学者 14:30:46 没类型的烦恼
chomp($count = ); 问题解决。
珠海 - 虚拟人生 14:37:27 按楼上的说法，我的理解是，你输入第一个数时，输完肯定要输一个回车吧，然后这脚本处理时把这个回车也赋给了那变量，所以输出也带这个回车（也就是换行），经过 ++ 之后，把这个换行符取消了，就正常输出相应的数了。
我也不懂开发，说得不能请专家指出~