在vba里使用PERL

figfig

[编辑本段]Perl是什么?
　　Perl是由Larry Wall设计的，并由他不断更新和维护的编程语言。
　　.Perl具有高级语言（如C）的强大能力和灵活性。事实上，你将看到，它的许多特性是从C语言中借用来的。
　　.与脚本语言一样，Perl不需要编译器和链接器来运行代码，你要做的只是写出程序并告诉Perl来运行而已。这意味着Perl对于小的编程问题的快速解决方案和为大型事件创建原型来测试潜在的解决方案是十分理想的。
　　.Perl提供脚本语言（如sed和awk）的所有功能，还具有它们所不具备的很多功能。Perl还支持sed到Perl及awk到Perl的翻译器。
　　简而言之，Perl象C一样强大，象awk、sed等脚本描述语言一样方便。
[编辑本段]Perl 的特点
　　Perl的解释程序是开放源码的免费软件，使用Perl不必担心费用。Perl能在绝大多数操作系统运行，可以方便地向不同操作系统迁移。
　　Perl 是一种能完成任务的语言。从一开始，Perl 就设计成可以把简单工作简单化，同时又不失去处理困难问题能力的语言。它可以很容易操作数字，文本，文件和目录，计算机和网络，特别是程序的语言。这种语言应该很容易运行外部的程序并且扫描这些程序的输出获取感兴趣的东西。而且它还应该很容易能把这些你感兴趣的东西交给其它程序做特殊的处理。当然，这种语言还应该很容易在任何现代的操作系统上可以移植地编译和运行。
[编辑本段]Perl 基本语法
　　变量定义，以$号开头，如：$num =1;
　　数组定义，以@开头，如：@array = (1,2,3);
　　数组元素调用 $array[index]，其中index表示数组下标，如上例，$array[0]的值是1
　　散列定义，以%开头，如：%hash=("a",1,"b",2);
　　散列调用 %hash，其中keys表示键值，多用字符串表示，如上例中的"a", "b", vaules是keys对应的值，如1，2。$hash{"b"}的值是2。





注意需要先安装ACTIVEPERL才能在Windows运行perl
下载地址 http://www.onlinedown.net/soft/8364.htm

[ 本帖最后由 figfig 于 2010-5-5 19:52 编辑 ]

aidixiao

感谢大师又开新课。

lipton

站位听课

figfig

Sub FIGPERL()



Set PERL = CreateObject("SCRIPTCONTROL")
PERL.Language = "PERLSCRIPT"


PERL.addcode "$aa='hello'"
y = PERL.eval("$aa")
MsgBox y


End Sub

office2008

请figfig老师把"PERLSCRIPT" 实例，事件都列举一点，谢谢！

wangfengcpa

谢谢分享，长见识了。

飞云楼主

谢谢老师的分享。

figfig

Sub perl()

Set x = CreateObject("scriptcontrol")
x.Language = "perlscript"
x.eval "sub add { return($_[0] + $_[1])}"

y = x.eval("&add(2,3)")
MsgBox y
End Sub

figfig

Sub perl()

Set x = CreateObject("scriptcontrol")
x.Language = "perlscript"
x.eval " $ans = reverse('abc');"

y = x.eval("$ans")
MsgBox y
End Sub

figfig

Sub perl()

Set x = CreateObject("scriptcontrol")
x.Language = "perlscript"
x.eval " sleep(5)"


MsgBox "ok"
End Sub