perl是不是不推荐使用do来调用子程序？

aero

在看这个地方。教材上没说。用了几种方法调用。用do的时候，给了一个警告。^_^。

perl真灵活呀，调用子程序的方式都有好多种。

apile

很少用吧.....perldoc -f do
可以看到一些說明...

aero

^_^，多谢多谢。

flw

原帖由 "aero" 发表：
在看这个地方。教材上没说。用了几种方法调用。用do的时候，给了一个警告。^_^。

perl真灵活呀，调用子程序的方式都有好多种。

呵呵，do 应该不会有警告，你可能搞错了。
代码贴上来？错误信息贴上来？

aero

1. [yangwl:/home/users50/yangwl/perl]$ cat ywl.pl
   
2. #!/usr/bin/perl -w
   
3. use strict;
   
4. 
   
5. sub ppp;
   
6. 
   
7. do ppp();
   
8. 
   
9. sub ppp
   
10. {
    
11.         print "Hello World!\n";
    
12. }
    
13. [yangwl:/home/users50/yangwl/perl]$ perl ywl.pl
    
14. Use of "do" to call subroutines is deprecated at ywl.pl line 6.
    
15. Hello World!
    
16. [yangwl:/home/users50/yangwl/perl]$

复制代码

aero

吼吼，学到很多。以后都用&。

flw

[quote]原帖由 "aero"]吼吼，学到很多。以后都用&。[/quote 发表：

哈哈！怕了吧？
不过我前两天看书，好像有句话说不论分说全用 & 打头的写法是丑陋的，
不潇洒。

apile

& 是從perl 4.x 時代留下來的..到了perl 5一般不建議使用...
就跟c差不多...建議你要先把subroutine宣告再使用...
不過如果不用&..常常又會碰到constant 跟subroutine
無法分辨..
getabc 123;
正常應該是呼叫&getabc 123
但是perl有時候會看成 getabc --->;是個constant...
主要是因為getabc被宣告在後面..但是你先用了...
所以出來一個語法錯誤....

flw

对于 apile 的说法，我稍微有一些疑问。
按照 Perl5 语法，不带 BLOCK 的 sub 语句认为是对子程序的声明，
类似于 C 语言中对函数的声明。
也就是说，在 aero 贴出的例子中，ppp 的确是已经声明过了的。
但是 do 的时候仍然有警告，所以我认为，
该警告主要来自于 do，因为 do 有好几种原型。

如果在别的场合以别的方式出现子程序调用，例如：

1. & ppp;
   
2. &ppp();
   
3. my $ret = & ppp;

复制代码

这样子的形式，则一律可以省略 & 号，并且建议省略，这样看起来就更加美观（或者更加丑陋）一些。

aero

原帖由 "flw" 发表：

哈哈！怕了吧？
不过我前两天看书，好像有句话说不论分说全用 & 打头的写法是丑陋的，
不潇洒。

^_^，唉，感觉perl太潇洒了，俺可潇洒不起来。俺喜欢一件事情就一种写法，没有一种写法就自己定一个风格。