Perl 一个简单 perl 程序的求教 (二)

xiaoxiang_7788@126.com · 2011年03月23日 · 1 次阅读

#! 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 按楼上的说法,我的理解是,你输入第一个数时,输完肯定要输一个回车吧,然后这脚本处理时把这个回车也赋给了那变量,所以输出也带这个回车(也就是换行),经过 ++ 之后,把这个换行符取消了,就正常输出相应的数了。

我也不懂开发,说得不能请专家指出~

需要 登录 后方可回复。