perl 5解释器是基于虚拟机的吗？

pugs

看过lua的部分源代码，lua解释器的工作原理大体如下：
(1) 解释器由编译器和虚拟机两个模块构成
(2) 编译器将LUA程序翻译成虚拟机指令
(3) 虚拟机解释这些虚拟机指令的含义
LUA解释器提供了一个选项可以观察LUA程序的中间表示，对于如下程序：

1. 
   
2. function add(a, b, c)
   
3.      return a + b + c
   
4. end
   

复制代码

可以使用luac -l列出它的虚拟机指令：

1. 
   
2. ADD t a b
   
3. ADD t t c
   
4. RETURN t
   

复制代码

perl 5解释器是基于虚拟机的吗？如果是的话，我如何观察perl程序的中间表示？谢谢。

MMMIX

原帖由 pugs 于 2008-12-27 19:53 发表
perl 5解释器是基于虚拟机的吗？

是的。

如果是的话，我如何观察perl程序的中间表示？

可以用 Perl 自带的一些模块，例如 B::*, 如

1. 
   
2. $ perl -MO=Terse t.pl
   
3. LISTOP (0x8225f28) leave [1]
   
4.     OP (0x8193070) enter
   
5.     COP (0x8225ef0) nextstate
   
6.     LISTOP (0x819ee90) print
   
7.         OP (0x82851e8) pushmark
   
8.         UNOP (0x819ee70) entersub [2]
   
9.             UNOP (0x819ee50) null [142]
   
10.                 OP (0x819a280) pushmark
    
11.                 SVOP (0x819ee30) const [4] IV (0x81976a0) 10
    
12.                 UNOP (0x819a298) null [17]
    
13.                     PADOP (0x819a1f0) gv  GV (0x8227da8) *factorial
    
14.         SVOP (0x82851c8) const [5] PV (0x8227d88) "\n"
    
15. t.pl syntax OK
    

复制代码

或按照执行顺序

1. 
   
2. perl -MO=Terse,exec t.pl
   
3. OP (0x8193078) enter
   
4. COP (0x819a548) nextstate
   
5. OP (0x819d780) pushmark
   
6. OP (0x820cf08) pushmark
   
7. SVOP (0x819a2b8) const [4] IV (0x81976a8) 10
   
8. PADOP (0x820cf20) gv  GV (0x8227da0) *factorial
   
9. UNOP (0x819a028) entersub [2]
   
10. SVOP (0x819d798) const [5] PV (0x8227d80) "\n"
    
11. LISTOP (0x819d7b8) print
    
12. LISTOP (0x819a580) leave [1]
    
13. t.pl syntax OK
    

复制代码

1. 
   
2. $ cat t.pl
   
3. use strict;
   
4. use warnings;
   
5. 
   
6. print factorial(10), "\n";
   
7. 
   
8. sub factorial {
   
9.         my $n = shift;
   
10. 
    
11.         return 1 if $n <= 1;
    
12.        
    
13.         return $n * factorial(--$n);
    
14. }
    

复制代码

参见 http://www.faqs.org/docs/perl5int/

[ 本帖最后由 MMMIX 于 2008-12-27 21:07 编辑 ]

pugs

http://www.faqs.org/docs/perl5int/

正是我需要的，谢谢！:wink:

lokchungk

see also Concise

MMMIX

原帖由 lokchungk 于 2008-12-27 23:07 发表
see also Concise

是 B::Concise，这个其实 B:: 下的一组模块中的一个。