主题:用Perl动态编译 -- ppw
共:💬8
#!/usr/bin/perl
$Action='CheckBaby';
open FileHdl,$Action;
print FileHdl "#!/usr/bin/perl\n";
print FileHdl "\$Message=\"Hello Mum\"\n";
close(FileHdl);
$Listening=`CheckBaby`;
chomp;
if($Listening) {
print "Baby stil alive\n";
}else{
print "is he dead or sleeping?\n";
}
简单的说就是这个程序自己写了个程序给自己用..
其实, 它还可以自己给自己写个COMPILER, 然后
把自的CODE重新COMPLIE一遍, 自杀后重起..
有意思啊...
以前很热门的话题么...
首先,Perl不算是主流编程语言,也就是Unix/Linux下面的一个编程语言,特点不过是字串处理和正则表达式处理,这些东西在主流编程语言都早有了。
其次,程序自己生成程序并不是什么新特性,Java/.Net都早就做到了,否则Reflection API是干什么的。
最后,程序自己生成程序不一定是什么好事情,至少在安全性和性能方面值得怀疑。
复 老兄
表明动态优化代码用什么语言都可以做到.
复 这主要是
哎,怎么跟你说呢?随便你吧,如果你坚持你自己的“看法”!
复 根本是两回事!
有理说不清啦..
我的动态优化啊, hehe, 动态重写子程序..hoho.
复 老兄秀才遇到兵
复 呵呵,老兄幽默
接着走楼梯。