Chinaunix

标题: 如果判断某个函数是否被定义？ [打印本页]

作者: sjdy521 时间: 2012-08-03 22:27
标题: 如果判断某个函数是否被定义？
本帖最后由 sjdy521 于 2012-08-03 22:27 编辑

我有一些自己的想法，可行，但是我总觉得不是很好，或者我理解的可能会有漏洞，所以发出来和大家确认下：

1、一个函数被定义了，例如sub func{}，那么符号表中就有该函数的引用，检查*func{CODE} 是否definded就ok

2、另外，还想到一个方法，用OO的方式的话，

$pkg=bless [];

$pkg->can("func") 根据返回的真假判断是否有定义的函数

我感觉第2中方法算是合理一些（不过也有点绕弯），1的方法都是直接深入到”内部“了，perl有没有提供一些更”外部“的方式

作者: zhlong8 时间: 2012-08-04 13:00
defined &func;

作者: sjdy521 时间: 2012-08-04 18:02
回复 2# zhlong8

You may also use defined(&func) to check whether subroutine &func has ever been defined.

非常感谢，受教了

作者: kk861123 时间: 2012-08-04 22:00
学习到了~~

作者: fanasy 时间: 2012-08-04 22:22
ref 也可以

作者: xiyoulaoyuanjia 时间: 2012-08-04 23:41
我还是对 bless的用法比较感兴趣呀！～

作者: gaowenhui2010 时间: 2012-08-06 18:16
学到了。。。

作者: sjdy521 时间: 2012-08-14 15:30
本帖最后由 sjdy521 于 2012-08-14 15:31 编辑

回复 5# fanasy

ref是ref(*func{CODE}) eq 'CODE'这个意思么，其他形式我没想出来

作者: flw 时间: 2012-08-14 16:27
本帖最后由 flw 于 2012-08-14 16:28 编辑

就算是想用 can，也犯不着 bless 一个没用的变量。

if ( __PACKAGE__->can('foo') ){
}

作者: sjdy521 时间: 2012-08-14 16:49
回复 9# flw

这个不错~之前没想到。。

作者: fanasy 时间: 2012-08-17 23:45
回复 8# sjdy521

对

欢迎光临 Chinaunix (http://bbs.chinaunix.net/)