#!/bin/perl
$phrase = 0;
for(;$phrase<=5;$phrase++){
print $phrase;
sleep(1);
}
运行后发现,程序先暂停了5秒钟,然后一下子就显示了12345。也就是说,先sleep,后print。为什么会这样?
本人初学perl,对其还不太了解。谢谢。
因为print并没有立刻打印到屏幕上,只有当输出缓冲区满了,或者遇到回车符号的时候才会输出。
#!/bin/perl
$phrase = 0;
for(;$phrase<=5;$phrase++){
print $phrase;
print "\n";
sleep(1);
}
这样试试
如果不想要回车,则可以设置autoflush
#!/bin/perl
#select((select(STDOUT), $| = 1)[0]);
$| = 1;
$phrase = 0;
for(;$phrase<=5;$phrase++){
print $phrase;
sleep(1);
}
| 论坛热门帖子: | [lch203] 写得蛮好的linux学习笔记(10-21) [黑马制造] 学习java的30个目标(10-19) [笑傲股林] 做测试半年了,有点迷茫,应该再学些什么提高自己的测试水平和测试能力呢?(10-19) [udp8589] 大家用google的来吱一声? 用百度的~~也来报道下?(10-18) [沂偌掳兆] 本人总结的一些认为C++比较经典的书籍,希望对大家有用(10-18) |
| TAG标签: | 问题 不得 函数 关于 phrase print sleep /bin/perl for |
注册
个人空间
