大家讨论下Perl OO的实现方式以及特点

2gua

Perl不是万能的，但很多人在工作中少了Perl是万万不能的。

phoenix_perl

我学习perl也感觉perl的OO相对牵强.

perl毕竟是比较早的脚本语言,那时候的OO还都是在概念上的.

我认为如果现在perl更改为真的OO,那语法和编写方式都会有很大的变化.

鱼与熊掌不能兼得.尺有所长,寸有所短.毕竟不能为了面向对象而面向对象,要考虑

到向下兼容及目前的用户群.

兰花仙子

我的目标是发展一门Shell OO语言，已在sourceforge上申请了项目，地址是：

http://sourceforge.net/projects/shelloops/

兰花仙子

我的目标是发展一门Shell OO语言，已在sourceforge上申请了项目，地址是：
兰花仙子 发表于 2011-01-21 10:58

    shell OO语法举例：

$ "/etc/passwd".cat.grep("pop").awk(":"){print $1}
pop

2gua

我的目标是发展一门Shell OO语言，已在sourceforge上申请了项目，地址是：
兰花仙子 发表于 2011-01-21 10:58

    Error 404

yiten

我是希望多了解大家在目前的perl下如何实现perlOO的。

比如对于perlOO封装问题，有一些策略，可能没有优劣，但至少也是perl的一种精神：
1、是否允许$obj->{attr}来直接读写属性值
2、是否有必要给属性实现get、set方法，或者通过AUTOLOAD自动变相给所有属性添加了set/get方法
3、规定使用_开头的属性和方法为私有的
4、通过闭包实现封装，甚至自己实现一个private关键字

yiten

可能有人说，封装那么重要吗？是的，很重要。为什么php、java有很多框架，而perl寥寥无几。
因为完备的OO特征很重要。比如框架底层类需要保存的一些数据，能够被你上面的代码乱改，那框架会崩溃的。

我在实现一些基础类库的时候，也是这样的感觉。有些属性如果被调用者改了，就是崩溃。

ttcn_cu

这个世界就是这么不完美的
Perl就是不干OO的
就算Perl可以OO，还得有大公司给你开发个NB的Frame

世界上有几个大公司这么干过？ MS，borland，Java。。。屈指可数。。。

greencow

我是用bless hash实现的，但是，封装是个大问题，我相信很多人都遇到过。
因为有些属性如果被外面修改了会 ...
yiten 发表于 2011-01-14 16:16

You can bless any reference. Nobody can touch the attributes without 'get'/'set' methods in following code.

package MyOO;
my $h = {};
sub oo {
        my $class = shift;
        $h = {@_};
        my $obj='donot touch my values';
        bless \$obj, $class;
        return \$obj;
}