perl 有没有动态 getter/setter方法(已解决)

ihongs

UID: 7428
帖子: 67
积分: 154
在线时间: 6 小时

11^# ihongs 发表于 2008-01-17 17:15

楼上同志提到的书我也有电子版的，可是也是英文的，没办法我只混了个半拉子大学，基本上文化程度高中不到，呵呵

ihongs

UID: 7428
帖子: 67
积分: 154
在线时间: 6 小时

12^# ihongs 发表于 2008-01-17 17:26

OK, 找到了，谢谢二位了。。。

sotol

UID: 1152
帖子: 21
积分: 48
在线时间: 10 分钟

13^# sotol 发表于 2008-01-17 17:36

这儿有正在写的一个用于编码的程序，使用了AUTOLOAD，可供参考，也请有兴趣的高人指点优化
注解可能不是很清楚
PS：运行test.pl有结果出现

ihongs

UID: 7428
帖子: 67
积分: 154
在线时间: 6 小时

14^# ihongs 发表于 2008-01-17 17:57

谢谢楼上的，嘿嘿

kgd924

UID: 25640
帖子: 1
积分: 2
在线时间: 10 分钟

15^# kgd924 发表于 2008-01-22 09:57

attributes

http://search.cpan.org/~rgarcia/perl-5.10.0/lib/attributes.pm

例：
use attributes;
__PACKAGE__->mk_accessors(
qw/counter request response state action stack namespace stats/
);