实现Automation接口的应用程序（或者DLL动态链接库）被称作 Automation Server。而创建并使用Automation接口的应用程序被称做 Automation Controller 或者 Automation Client 。许多应用程序，比如 Microsoft Word，Excel，Access，以及其他 Office 应用程序等等，都已经实现了 Automation 接口。Automation 被广泛使用在 ASP，CGI 脚本中，通过 ADO 技术来存取某个 Data Respository。
为了创建一个 Automation 对象，Automation Server 需要在系统中注册一下自己。一般来说，一个应用程序在安装时，已经帮你做了这一步，当然啦，即便没有，那么你也可以使用 regsrv32.exe 这样的工具来手动注册你的应用。这将在系统的注册表中插入一个条目，来告诉COM如何找到这个组件，它提供了什么类型的接口，它是什么类型的 Automation Server 。你能在一个应用程序的文档中找到有关它的 Automation 对象，以及相关信息。使用Perl语法同样能够创建这样的对象并访问它的组件。
以下的就是Perl跟 Automation 相关的基本功能模块。
Win32::OLE
提供Perl对OLE Automation技术最主要的支持。通过这个模块，你能创建并使用 Automation 对象，调用对象的方法，配置对象的属性。
Win32::OLE::Enum
创建 Collections 对象，并提供接口枚举其中的项目。
Win32::OLE::Variant
允许你转换相关数据类型成OLE中的Variant数据类型。
Win32::Const
将Automation对象的常量导入到你Perl脚本中去。
注：Win32::OLE 目前还不支持 OCXs 和 OLE 事件。Win32::OLE 仅实现了 IDispatch 接口，因此它还不能存取一个客户化的 OLE 接口。
1. 创建对象
Automation 对象在Perl里面用 Win32::OLE 对象的实例来替代。Win32::OLE 提供了三个构建器来创建一个注册了的Automation 对象。
2. Automation 方法和属性
一旦你创建了一个 Automation 对象，你就可以调用对象的方法，如果需要你还可以调整对象的属性。Automation 对象方法调用用Perl语法来表示：
$obj->some_method( args );
Automation 对象方法通常都会需要很多参数。如果你不想要任何一个参数，你可以在参数表里用undef来代替。
$xl->WorkBooks(1)->SaveAs( $f , undef , undef , undef , undef , 1 , undef , undef , 1 );
你也可以用一个包含命名参数赋值的hash 散列的引用来作为参数。上面这个例子也可以这样写：
$xl->WorkBooks(1)->SaveAs( $f , {AddtoMru => 1 , CreateBackup => 1});
Automation 对象的属性可以用hash符号来访问。比如：
$value = $obj->{“property“};
$obj->{“property“} = $value;
你也能枚举一个Automation的属性，用下面的方法：
$xl = Win32::OLE->new(“Excel.Application“);
while ( ($key,$value) = each %$xl)
{
print “$key = $value \n“;
}
2. Win32::OLE 方法
Win32::OLE 定义了一些它自己的方法来处理 Automation 接口。这些方法不是 Automation 定义的方法，虽然它们好像看起来是。如果一个方法在Win32::OLE 中没有定义，那么方法调用就被传递到 Automation 对象。如果 Automation 对象也没有定义。那么你将会得到一个 OLE 错误。
下面是在Win32::OLE 中定义的方法。
3. Win32::OLE函数
下面是在Win32::OLE中定义的函数。缺省没有导出来。
4. Win32::OLE 类变量
Win32::OLE 定义了某些类变量来配置 Automaion 使用的缺省行为。
$Win32::OLE::CP
确定在Perl 字符串和Automation 接口Unicode之间转换的 codepage。
缺省值是 CP_ACP，标识 ANSI codepage。
$Win32::OLE::LCID
控制所有 OLE 调用的 locale identifier。它缺省被设置为LOCAL_NEUTRAL。
$Win32::OLE::Warn
定义了当错误发生时，Win32::OLE 的行为。
