已经解决.结贴 脚本 Perl - print函数不能打印变量的值 (输出缓冲)

sunzhiguolu

我是一个perl语言的初学菜鸟,今天写了一个perl脚本但是就是不能打印处相关的信息,请各位大神给予帮助:

1. #!/usr/bin/perl
   
2. foreach my $item (qw<one two three>){
   
3.    print "$item";
   
4. }
   

复制代码

啥也不出,什么情况?

sunzhiguolu

有谁能慷慨解囊,为一个菜鸟答疑解惑,在此我先谢过哪些浏览帖子的热心朋友!

zhlong8

你是怎么运行这个脚本的？

sunzhiguolu

非常感谢您的热心帮助,谢谢! 以后我会常来板块发帖并及时为我能帮助的人回帖!

sunzhiguolu

回复 3# zhlong8

1. chmod 755 a
   
2. perl a

复制代码

sunzhiguolu

^_^ , 有人帮助真是一种幸福,坐等大神给我指点迷津...

zhlong8

代码如果你是直接复制的那就没问题，运行 perl filename 的方式也是正确的，我猜你的脚本不叫 a

sunzhiguolu

我的脚本名字是:mx_perl_operate_array

sunzhiguolu

回复 7# zhlong8
是我手工一点一点敲上去的.

   

sunzhiguolu

回复 7# zhlong8
大神我的屏幕啥也不出!

如果在print函数的末尾加上个"\n"的话,就能显示点东西.还请大神指点!