
Perl
annkie
混迹于移动互联网和手机行业。
展开
-
[Perl]备忘录。
【不断补充中...】1. 转换大小写 my $str = ifeq ($(strip $(RELEASE_PROJECT_VERNO),K520M00_PR1);#/L 为转为LowerCase#/U 为转为UpperCaseif ( $str =~ s/(/w+)//L$1/g ){ say $str;} 2. 输入输出 1)文原创 2010-02-26 11:44:00 · 776 阅读 · 0 评论 -
[Perl]正则表达式基础。
/ 将下一个字符标记为一个特殊字符、或一个原义字符、或一个后向引用、或一个八进制转义符。例如,n匹配字符"n"。/n匹配一个换行符。序列//匹配"/"而"/("则匹配"("。 ^ 匹配输入字符串的开始位置。如果设置了RegExp对象的Multiline属性,^也匹配/n或/r之后的位置。 $ 匹配输入字符串的结束位置。如果设置了RegExp对象的Multiline属性,$也匹配原创 2010-02-26 09:33:00 · 684 阅读 · 0 评论 -
Android:逆向工程之自动删除默认构造函数this$0小工具
我们知道,在反编译出来的java源代码中会看到很多由编译器自动生成的默认构造函数的代码,我们需要删掉这部分代码。还是用Perl脚本来实现这个目标。直接上Perl源代码:使用方法:将下面源代码复制到一个文本文件中,后缀改为.pl,即perl脚本。如:removeThis.pl 需要处理的源代码目录路径作为参数运行。即在命令行: perl removeThis.pl [PA原创 2012-11-28 11:02:10 · 2280 阅读 · 0 评论