各位大虾，小弟又遇难处啦

104359176

回复 10# yinyuemi


    你的编辑器默认的TAB的宽度似乎是2个。

MMMIX

回复 5# 104359176


    连个帖子标题都写不好，连问题都描述不清楚，能远到什么地方去？

MMMIX

104359176 发表于 2014-04-09 11:43
呵呵，这个好，看样楼主对语法解析感兴趣啊，建议学 Lisp 吧

他的问题不是语法解析，而就是简单的递归变量替换（也可看作表达式求值）。编译的优化阶段会用到这个。

MMMIX

回复 5# 104359176


    怎么看，都像是楼主在让大伙帮他做作业，算算时间，他也该学到这块了。

104359176

现在哪里还有 Perl 方面的培训外加作业呢？

rubyish

看了《代码之美》之後, 我学会了如何写出漂亮的代码.~


PURE ART ~



The Art of Code ~

1. #!/usr/bin/perl
   
2. 
   
3. print
   
4.   map       {#+@^=~[%%{*(;$
   
5.     $   _   ."\t= ".#%;:}])
   
6.   join      ('_',#~!]=]%~&,
   
7.     &   _   (#]@+~+#+%}%@#:
   
8.     $   _   )).";".$/}#$}}:
   
9.   map       {(##*?;<})):%?=
   
10.     $   _   ,#@}&$?;;(*}}}}
    
11.     @   _   )=/[^=;\s_]+/g;
    
12.     $   _   {#;!,&<%@]!{})[
    
13.     $   _   }=[#&#*!?=,(]?!
    
14.     @   _   ];#+?[(?+<{=}=&
    
15.     $   _   }<DATA>;#{&+~@?
    
16.   sub   _   {#{)<({?@$=<~$>
    
17.   map
    
18.     $   _   {#{;,~:*}]!=={%
    
19.     $   _   }#]%;<+)=}~!!&?
    
20.     ?   _   (@{#;=()@$+;&~+
    
21.     $   _   {#+&>$=^#*&$)#>
    
22.     $   _   }}):#:#!%})^#)}
    
23.     $   _   ,#{>[*?+!*%~:},
    
24.     @   _   }##{)*)~^#%>@!@
    
25. 
    
26. __DATA__
    
27. ABC     =   A1_B1;
    
28. ABD     =   C1_D1;
    
29. A1      =   D0_A0;
    
30. B1      =   A1_ABD;
    
31. C1      =   C0;
    
32. D1      =   B0_C1;
    

复制代码

MMMIX

回复 15# 104359176


    难道就不能是编译原理（或类似课程）的作业，可以用 Perl 完成？

MMMIX

回复 16# rubyish


    So cool!

rubyish

回复 18# MMMIX

Perl 是富有表现力优美雅致的语言, ~
赞一个~
   

104359176

回复 16# rubyish

      这个也叫美啊？简直就是天书密码。排版倒是挺美的，这种形式用于代码加密不错。真的能执行吗？还是2000块的作品出炉了？