1. 在服务端QC的安装目录下jboss\server\default\deploy目录下找到20qcbin.war这个war包。

　　2. 用winrar打开这个目录，可以看到start_a.htm这个文件。

　　3. 把start_a.htm这个文件copy出来修改添加|| (ua.lastIndexOf(’MSIE 7.0′) != -1)|| (ua.lastIndexOf(’MSIE 8.0′) != -1)后替换  war包中的start_a.htm文件。这里也可以直接在原文件修改。

　　修改配置成功后，下次重启QC服务也不会有问题。原因是重启服务器的过程中会把20qcbin.war中的内容解压出来到临时目录下的。

　　这里注意：改完上面的配置如果不想重启服务器，就需要把temp中的start_a.htm这个文件也增加ie7，ie8的支持。只改系统文件是需要重启QC服务的～

error at login to QC 10 - test_type.cab

所有的bea产品的License Keys都开放了，

License Keys来源：

http://commerce.--escaped_anchor:2293621d93a909cfd046ff6713918d6c--.com/products/all_products.jsp

下载url为：

MessageQ：

http://download2.bea.com/pub/license/All Products/MessageQ.zip

BEA Tuxedo Products：
http://download2.bea.com/pub/license/All Products/BEA_Tuxedo_Products.zip

BEA WebLogic：
http://download2.bea.com/pub/license/All Products/BEA_WebLogic.zip

BEA AquaLogic：
http://download2.bea.com/pub/license/All Products/BEA_AquaLogic.zip

BEA WebLogic Communications Platform：
http://download2.bea.com/pub/license/All Products/BEA_WebLogic_Communication_Platform.zip

BEA Workshop：
http://download2.bea.com/pub/license/All Products/BEA_Workshop.zip

Blended Open Source Resources：
http://download2.bea.com/pub/license/All Products/Blended_Open_Source_Resources.zip

BEA JRockit：
http://download2.bea.com/pub/license/All Products/BEA_JRockit.zip

其它产品的：

http://download2.bea.com/pub/license/All Products/Other_Products.zip

新的bea jrockit 6.0 下载入口为：

http://commerce.bea.com/products/weblogicjrockit/jrockit_prod_fam-bea.jsp

http://dev2dev.bea.com.cn/techdoc/2007/07/java-soa-BEA-JRockit.html

http://commerce.--escaped_anchor:2293621d93a909cfd046ff6713918d6c--.com/products/weblogicjrockit/accept_terms60-bea.jsp

虽然JRockit Mission Control 2.0已经包含在BEA JRockit R27.1以上版本的JDK里面了，即安装后就有了。但是，为了使用它，你还需要下载一个适合与你的许可。BEA提供两种类型许可：免费的有限制的开发者 许可和收费的无限制的企业许可。许可下载地址为 http://dev2dev.bea.com/jrockit/tools.html

对应Jrockit安装程序为：

http://download2.--escaped_anchor:2293621d93a909cfd046ff6713918d6c--.com/pub/jrockit/60/jrockit-R27.5.0-jdk1.6.0_03-windows-x64.exe
http://download2.--escaped_anchor:2293621d93a909cfd046ff6713918d6c--.com/pub/jrockit/60/jrockit-R27.5.0-jdk1.6.0_03-windows-ia32.exe
http://download2.--escaped_anchor:2293621d93a909cfd046ff6713918d6c--.com/pub/jrockit/60/jrockit-R27.5.0-jdk1.6.0_03-linux-ia32.bin
http://download2.--escaped_anchor:2293621d93a909cfd046ff6713918d6c--.com/pub/jrockit/60/jrockit-R27.5.0-jdk1.6.0_03-linux-x64.bin
http://download2.--escaped_anchor:2293621d93a909cfd046ff6713918d6c--.com/pub/jrockit/60/jrockit-R27.5.0-jdk1.6.0_03-solaris-sparcv9.bin

简介
　　JRockit JVM不只是快，它还和JRockit Mission Control一起，组成一套执行运行时分析和内存泄漏检测的分析工具，JRockit Management Console包含在JRockit JDK中。本文将探讨JRockit Management Console的一种试验性的headless模式，它可以用于与来自命令行的基于JRockitJMX的管理代理进行交互。Ctrl-Break Handler提供了一种向JRockit发送各种高级命令的方法，甚至是在它启动后。这些命令甚至可以远程调用，我在后文中会提及。最后，我探讨了试验 性的code coverage，JRockit开箱即用地提供了该特性。

　　关于BEA JRockit的更多信息，参见dev2dev网站的JRockit Product Center。

　　首先我将快速概述一下JRockit JVM可用的已确定的管理工具，然后我会转向缺少文档的试验性管理特性。

JRockit Mission Control
　 　JRockit R26.0.0版本引入了JRockit Mission Control工具套件，它包含的工具可以进行监控、管理、分析和消除Java应用程序内存泄漏，而不会引起通常与此类工具相关联的性能开销。 Mission Control的低性能开销是因为使用了作为JRockit常规适应性动态调优的一部分而收集的数据，这还可以消除工具使用字节码装置修改系统执行特性时 发生Heisenberg异常的问题。JRockit Mission Control功能可以根据需要随时可用，低性能开销也只在运行工具时有效。这些特征使得JRockit Mission Control成为专门用于生产中系统的工具。

JRockit Mission Control中包含以下工具：

• JRockit Management Console
  JRockit Management Console用于监控和管理多个JRockit实例。它捕获并显示关于垃圾收集器（GC）暂停、内存和CPU使用的实时数据，以及部署在JVM内部 MBean服务器上的所有JMX MBean的信息。JVM管理包括对CPU相似性、垃圾收集策略和内存池大小的动态控制。
• JRockit Runtime Analyzer
  JRockit Runtime Analyzer（JRA）是一个随需应变的“动态记录器”，它生成关于JVM和正在运行的应用程序的详细记录。然后可以使用JRA应用程序对记录下来的 配置文件进行离线分析。所记录的数据包括对方法和锁定的分析，还有垃圾收集统计信息，优化决策以及对象统计信息。
• JRockit Memory Leak Detector
  JRockit Memory Leak Detector工具用来发现和查找内存泄漏原因。Memory Leak Detector的趋势分析器可以发现非常缓慢的泄漏，显示详细的堆统计信息（包括指向泄漏对象和分配位置的引用类型和实例），并快速找出泄漏原因。 Memory Leak Detector使用先进的图形化表现技术，以便更容易定位和理解有时比较复杂的信息。

　　关于JRockit Mission Control的更多信息，可以阅读文章An Introduction to JRockit Mission Control，或者访问dev2dev网站的JRockit Mission Control。

　　JRockit Management Console的Headless模式（试验性）

　 　JRockit Management Console是监控JRockit运行的工具。它包括两部分：一个运行在JVM进程中的JMX代理，一个使用图形化用户界面的独立客户端（关于它以及其 它方面的更详细的信息，请参见An Introduction to JRockit Mission Control）。其中，用户界面可以绘出部署在所连接的Java虚拟机中的任何MBean的数值属性的图形。图形密集的应用程序对资源的消耗可能会相当 厉害，JRockit Management Console也不例外。可以引入text-only（纯文本）模式，以便使用Management Console的通知功能和数据收集工具而不会导致整个GUI的开销。

　　headless控制台引入了大量新的命令行参数。这同样适用于控制台的GUI版本。参数包括：

　 　这里给出一个以headless模式启动Management Console的例子，读取指定配置文件，尝试连接所有已指定的JRockit，使用JRockit发现协议（JDP，下文讨论）积极查找新的 JRockit。30秒后将以每分钟一次的间隔向所有连接的JRockit发送Ctrl-Break命令。一小时之后自动关闭。以前加入指定连接的所有通 知规则（不管是通过使用GUI还是通过直接编辑配置文件添加的）将生效。

java -jar ManagementConsole.jar -headless    -settings C:\Headless\consolesettings.xml -connectall    -autoconnect -uptime 3600 -useraction ctrlbreak 30 60

　 　用户动作是可以与JRockit Management Console上的一组连接进行交互的插件类，同样使用控制台配置文件来存储配置数据。用户动作显示在JRockit控制台图形用户界面的Plugins 菜单下，headless模式中也可用。随控制台提供了两个默认用户动作：jrarecording用户动作，对连接的JRockit启动JRA记 录；ctrlbreak用户动作，向连接的JRockit发送Ctrl-Break命令（参见本文中关于Ctrl-Break Handler和JRockit运行时分析器的小节）。要指定特定用户动作的参数，可以使用GUI进行配置，也可以编辑Management Console配置文件，后者可以在<user.home>/ManagementConsole/ManagementConsole /consolesettings.<version>.xml文件中找到。

　　编写自己的用户动作很容易。首先创建一个AbstractUserAction的子类。该示例演示了如何创建一个从所有连接的JRockit获取线程堆栈转储的用户动作。

package com.example.useractions;import java.io.IOException;import java.util.List;import com.jrockit.console.rjmx.CommonRJMXNames;import com.jrockit.console.rjmx.RJMXConnectorModel;import com.jrockit.console.useractions.AbstractUserAction;/** * This is a simple user action, getting stackdumps from  * the selected JRockits and printing them on stdout. *  * @author Marcus Hirt */public class MyUserAction extends AbstractUserAction{  public void executeAction(List connections)  {    for (RJMXConnectorModel connection : connections)    {      if (connection.isConnected())      {        try        {          System.out.println(CommonRJMXNames.getThreadMXBean(connection).getThreadStackDump());        }        catch (IOException e)        {                    e.printStackTrace();        }      }    }  }}

　 　接下来，需要在consolesettings.xml文件中配置部属描述符，以便用户动作对于控制台可用。可以在配置文件中发现 user_actions元素，它已经填充了一些user_action元素。示例动作的部署描述符应当以相同的样式输入。描述符看起来会是这样：

<user_action>  <user_action_class>com.example.useractions.MyUserAction</user_action_class>  <user_action_name>stackdump</user_action_name>  <user_action_menu_name>Stack Dump on stdout</user_action_menu_name>  <user_action_description>Gets a stack dump from the selected JRockit(s), and dumps it on stdout.</user_action_description></user_action>

　　这也使得用户动作在Plugins菜单下的用户界面中可见。

　　当控制台启动或退出时，如果有设置/状态需要从配置文件加载/保存，只需重写exportToXml()/importFromXml()方法，如示例中所示：

/** * @see com.jrockit.console.util.XmlEnabled * #exportToXml(org.w3c.dom.Element) */public void exportToXml(Element parentNode){  super.exportToXml(parentNode);  XmlToolkit.setSetting(parentNode, MY_PROPERTY, m_myVal);}/** * @see com.jrockit.console.util.XmlEnabled * #initializeFromXml(org.w3c.dom.Element) */  public void initializeFromXml(Element parentNode)  {   super.initializeFromXml(parentNode);   m_myVal = XmlToolkit.getSetting(parentNode,     MY_PROPERTY, DEFAULT_MY_VALUE));}

　 　注意，用户动作的名称是使用launcher启动参数时将引用的用户动作名称，菜单名是会在GUI菜单中显示的名称。更多的信息请参见user action docs和JLMEXT docs。注意，这只是一个试验性的功能，提供的文档还相当简单，编写定制的通知动作和约束的方式与此类似。更多信息请参见Management Console User Guide。

JRockit发现协议（JDP）
　　JDP（JRockit发现协议）是个简单且有效的协议，用于允许JRockit管理服务器向Management Console组播它的存在。下面的两个表分别列出了在服务器端和客户端控制JDP行为的系统属性。

管理服务器的JDP属性

Management Console的JDP属性

　　这里给出了在服务器端启用JDP的情况下，启动JRockit需要最少参数的示例。

　　Ctrl-Break Handler

　 　您是否曾经希望在JVM启动后可以使用一种轻松的方式与其交互？假如说您忘记添加-Xmanagement选项来启动管理服务器，或者您想改变运行系统 中GC的冗余级别。这些现在很容易通过重新配置Ctrl-Break Handler来完成，而且它不只是打印堆栈跟踪。

• 创建一个名为ctrlhandler.act的文件。
• 向ctrlhandler.act文件添加命令（参见下文命令列表）。
• 以“stop”结束文件，这是结束文件分析的保留命令。
• 按下ctrl-break，每一个命令都将以出现的顺序执行。

　 　JRockit首先会在当前工作目录查找该文件。如果未找到，JRockit将在JVM目录中查找。如果仍然没有的话，JRockit将回退以生成一个 常规的线程堆栈转储。JRockit将在每次按下ctrl-break时读取act文件，因此用户可以在方便时重新配置该文件，而同时JRockit仍在 运行。

　　这里给出一个示例act文件，它首先打印时间戳，然后是用于启动JRockit的命令行，最后是一个线程堆栈转储。它还包括可以用于act文件的有用命令的列表：

# Example ctrlhandler.act filetimestampcommand_lineprint_threadsstop# set_filename filename=<file> [append=true]#  Sets the file that all handlers following this command will#  use for printing. You can have several set_filename commands#  in a file. It takes two arguments:  filename and an optional#  append to specify if you want to append to the file #  or overwrite it. Default is to overwrite the file. # timestamp#  Prints a timestamp. # print_threads#  The normal thread dump.# verbosity [args=<components>] [filename=<file>]#  Changes the verbosity level normally specified with -Xverbose. # version#  Prints JRockit version information. # command_line#  Prints the command line used to start JRockit. #  print_object_summary#  Prints heap usage statistics (how much heap is used per class),#  together with a delta on how much this has changed since#  the last invocation of this ctrl-break handler.# print_memusage#  Prints a memory usage report of how JRockit is using#  the memory.# heap_diagnostics#  Prints a detailed report of the heap, including ascii graphics #  over the heap layout.# print_class_summary#  Prints all loaded classes. # print_utf8pool#  Print all UTF8 strings. # jrarecording [filename=<file>] [time=<time>] [nativesamples=true]#  Starts a JRA recording.# run_optfile [filename=<file>]#  See OptFile. # start_management_server#  Starts the new JMX-based management agent. # kill_management_server#  Stops the management agent. # start_rmp_server#  Starts the old management server (actually the listening #  socket that in turn starts servers whenever a connection#  is established). # kill_rmp_server#  Stops the old management server (actually shuts down the#  listening socket). The only reason it isn't named #  kill_rmp_server is that stop is a reserved keyword #  that stops the parsing of the act file. ;) # help [ctrl-break handler]#  Prints all available ctrl-break handlers if no argument #  is specified, or help for the specified ctrl-break handler.# memleakserver [port=<port>]#  Toggles the memleakserver. If it hasn't been started #  it will be started. If it has already started, it will be#  shut down. The default port is 7095.# verbose_referents action=[heap|full|nursery|start|stop]#  Print verbose reference information.#  Parameters:#   action=[heap|full|nursery|start|stop]#    heap    - trigger a heap collection and output reference#              information#    full    - trigger a full heap collection (clears softly #              reached soft referents)#    nursery - trigger a nursery collection (heap collection #              if running without nursery)#    start   - start writing reference information to default#              verbose stream#    stop    - stop writing reference information# print_exceptions #  exceptions=[true|all|false] stacktraces=[true|all|false]#  Enable printing of Java exceptions thrown in the VM.#  Parameters:#    exceptions    - print exceptions#    stacktraces   - print exceptions with stacktraces#  At least one of the parameters is required.#  Values for the parameters can be "true|all|false"#    true  - print all exceptions #             except java/util/EmptyStackException,#             java/lang/ClassNotFoundException and #             java/security/PrivilegedActionException#    all   - print all exceptions#    false - don't print exceptions#  To turn exception printing off completely you need to set#   exceptions = false even if it was turned #   on by stacktraces = true.JRCMD使用JRCMD实用工具是一种新的调用Ctrl-Break Handler的便捷方式，可在JRockit发行版的bin目录中找到它。用法jrcmd <PID> <command> <parameters>

JRCMD
　　使用JRCMD实用工具是一种新的调用Ctrl-Break Handler的便捷方式，可在JRockit发行版的bin目录中找到它。

• PID = 要在其中执行Ctrl-Break Handler的JRockit进程的进程ID。
• command = 要执行的Ctrl-Break Handler命令。
• parameters = Ctrl-Break Handler的参数。

　　如果不指定选项（或者只指定-P），那么将显示运行在本地机器上的所有JRockit的进程ID。如果PID设为0，那么命令将发送给在本地机器上运行的所有JRockit JVM。

　　要列出特定的JRockit中有哪些Ctrl-Break Handler可用，可以使用help命令：

　　要想获得某个具体的Ctrl-Break Handler的帮助信息，需要在help后添加Ctrl-Break Handler的名称，比如：

　　也可以使用JRCMD列出指定进程的性能计数：

远程调用Ctrl-Break Handler
　 　可以使用JRockit Management Console来远程调用Ctrl-Break Handler。存在一个对JRockitConsoleMBean的操作，称为runCtrlBreakHandlerWithResult。 JRockit Management Console可以从属性浏览器调用对MBean的操作。这里有关于如何调用Ctrl-Break Handler的逐步描述。

• 连接到一个运行中的JRockit。
• 右击该连接，选择Browse Attributes。
• 展开com.jrockit domain文件夹，选择JRockitConsole MBean。
• 单击operations选项卡，查看可用操作。
• 单击String parameter参数按钮，找到runCtrlBreakHandlerWithResult操作。
• 输入希望执行的Ctrl-Break Handler名称。语法与ctrlhandler.act文件相同。按下OK。
• 按下Execute按钮，执行操作。

　　试着输入“help”作为参数，将会列出所有可用的Ctrl-Break Handler，如图1所示。

图1.从JRockit Management Console调用Ctrl-Break Handler（单击图片查看大图）

堆视图（试验性）
　 　当分析应用程序如何使用某种垃圾收集策略时，在每一次GC后对堆进行快照将会非常有帮助。这有助于开发人员研究数据，比如碎片/压缩以及算法通常如何执 行。但是快照中包含如此多的数据量以至于查看它没有什么意义，因此JRockit团队开发了一个提供图形化表示的小工具，以便更好地进行说明。

　　图2显示了一个快照的例子（使用的是一个非常早的JRockit 1.4.2预发布版本）：

　 　每一排表示一次垃圾收集。左边是开始的堆，右边是结束的堆。堆显示的右边是一个可配置图形。实心白色区域表示空白堆，黑色区域是充实区（也就是填充了对 象的区域），浅灰色区域是碎片区，红色、黄色和绿色区域是可配置图形。可以从命令行指定在可配置图形中显示什么。该工具依然很粗糙，对于用户也不够友好， 不过毋庸置疑它对JRockit的终端用户非常有用，所以这是一个非常不错但是不能通用的工具。

code coverage（试验性）
　 　很多开发人员在以某种方式使用他们的应用程序时，使用code coverage分析来研究诸如代码库中的多少以及哪些部分正在运行之类的状况。测试人员喜欢使用code coverage来度量测试套件覆盖应用程序的比例。但是，对于大型应用程序，由code coverage工具所引起的性能开销通常是被禁止的。

　　JRockit内置了高性能的行code coverage。当启用code coverage运行时，代码将由记录行命中的捕获器生成。一旦某行被命中并记录，就删除捕获器，JRockit可以继续以接近全速的速度运行。

　　要使JRockit记录code coverage数据，必须指定一个命令行选项。

　　可以使用以下系统属性来控制该行为：

　　这里给出特定于code coverage的参数，用于生成如下图中所示的数据。

　　在内部，由一个code coverage小工具来解释JRockit所生成的数据，如图3所示。

图3：code coverage工具的输出示例（点击图片查看大图）

结束语
　 　BEA对Java运行时的掌控将其置于一个独一无二的位置：BEA交付了一些针对Java平台的低开销的管理和监控特性。很多针对BEA JRockit的有趣的管理和使用特性正在开发中。其中一些已经随着包含在JRockit 5.0 R26中的JRockit Mission Control而可以使用，更多特性也即将出现。更多信息请参见Mission Control home page。

参考资料

• An Introduction to JRockit Mission Control，Marcus Hirt撰写（dev2dev，2005年12月）
• Memory Leaks, Be Gone，Staffan Larsen撰写（dev2dev，2005年6月）——提供了关于内存泄漏检测系统的大量信息
• New Features and Tools in JRockit 5.0，Eva Andreasson撰写（dev2dev，2005年2月) ——提供了一份很早但却很有用的、JRockit 5.0中的多个特性的汇总
• dev2dev JRockit Product Center——包含大量可以订阅的信息和博客
• Mission Control section，dev2dev——包含JRockit工具的更多信息

如果跨任何种类的许多不同计算机运行 Perl，您会知道跨这些计算机安装 Perl 扩展模块是多么令人厌烦。如果有 Web 服务器农场，并且需要将每台机器和用于安装的一组扩展模块的最新信息保持一致，那么管理过程会更糟。CPAN 对此可能有所帮助，但 CPAN 存在一些问题，这些问题使它无法成为可以在网络上广泛使用的解决方案。在介绍最终系统之前，本文将提供一些可能的解决方案。主要目标是统一的安装/模块集 合、单一下载和在网络上所有计算机中使用一组有保证的统一版本号。

Perl 模块安装

在 安装 Perl 的同时，您会开始认识到有多少模块组成了该语言的“基础”安装。随着时间的推移，还要安装越来越多的模块，以扩展 Perl 安装的功能。安装模块并不复杂。大多数模块都打包为简单的压缩 tarball。该 tarball 包含一些必要的文件 —— 如果需要，还包括用于第三方库集成的 C/C++ 代码。

大多数 Perl 模块都使用 MakeMaker 系统，它是安装基础 Perl 时一起安装的另一种 Perl 模块，它提供了关于 Perl 安装的信息，以及在适当位置构建和安装组件的机制。MakeMaker 将简单配置文件转换为标准 makefile，该 makefile 可以与大家熟悉的 make 命令一起使用。

使用 CPAN

如 果还不了解 Comprehensive Perl Archive Network（CPAN），那么可以参考随每次安装提供的主页。CPAN 可以以两种方式工作：通过交互 shell 或通过一系列函数，可以将这些函数用作范围较广泛的基于 Perl 脚本的解决方案的一部分。最简单地说，可以使用 CPAN，只通过输入 perl -MCPAN -e "install modulename" 来安装模块，其中 modulename 是要安装的包、绑定或完整 Perl 模块的名称。CPAN 将执行其他操作。

CPAN 自动化

大多数人都熟悉作为构建和安装 Perl 模块的交互 shell 的 CPAN。许多人不知道的是，提供这项功能的 CPAN 模块实际上只是内部应用程序接口（API）的包装器。例如，要生成已安装的且与 CPAN 上可用版本相比已经过时的模块的列表，可以仅调用 CPAN::Shell->r。清单 1 是这条命令及其输出的例子。

				
$ perl -MCPAN -e 'CPAN::Shell->r'
CPAN: Storable loaded ok
Going to read /export/build/solaris/cpan/Metadata
  Database was generated on Sun, 25 Jul 2004 02:10:00 GMT
Package namespace         installed    latest  in CPAN file
B::Assembler                   0.06      0.07  N/NW/NWCLARK/perl-5.8.5.tar.gz
Cwd                            2.19      2.20  K/KW/KWILLIAMS/Cwd-2.20.tar.gz
DBD::mysql                   2.9003    2.9004  R/RU/RUDY/DBD-mysql-2.9004.tar.gz
DateTime                     0.2101      0.22  D/DR/DROLSKY/DateTime-0.22.tar.gz
DateTime::TimeZone             0.27      0.28  D/DR/DROLSKY/DateTime-TimeZone-0.28.tar.gz
File::Scan                     1.23      1.25  H/HD/HDIAS/File-Scan-1.25.tar.gz
File::Spec                     0.87      0.88  K/KW/KWILLIAMS/File-Spec-0.88.tar.gz
Image::Magick                 5.5.7       6.0  J/JC/JCRISTY/PerlMagick-6.02.tar.gz
Mail::ClamAV                   0.08      0.11  S/SA/SABECK/Mail-ClamAV-0.11.tar.gz
Module::CoreList               1.94      1.95  R/RC/RCLAMP/Module-CoreList-1.95.tar.gz
POE                          0.2802      0.29  R/RC/RCAPUTO/POE-0.29.tar.gz
XML::RSS::Parser               2.11      2.15  T/TI/TIMA/XML-RSS-Parser-2.15.tar.gz
htmlop                       v0.2.6      0.26  J/JA/JANL/w3mir-1.0.10.tar.gz
5 installed modules have a version number of 0
890 installed modules have no parseable version number

自动安装这些模块，这样就可以保持最新状态，将对 CPAN::Shell->r 的调用嵌入到对 CPAN::Shell->install 函数的调用中：

该代码转储清单 1 中的信息，然后安装每个模块，使其处于最新状态。

网络中的 CPAN 自动化

CPAN 是一个非常好的工具，但是该系统也有它的局限性。主要缺点之一就是它是单系统解决方案，如果以单一计算机为基础来管理 Perl 安装，那么这个解决方案很好。但是如果一组 Perl 模块分布在 Web 服务器农场中，或者甚至分布在实验室中的一系列平台上，那么在所有计算机中保持最新状态可能会非常花费时间，即使使用上面讨论的自动化技术也是如此。

CPAN 还会消耗许多 Internet 带宽，因为对于使用 CPAN 的每台计算机，CPAN 要从一个中心 CPAN 存储库下载文件的副本。CPAN 还依赖于配置，因此必须为每台计算机修改配置：只有在可以以完全一致的方式配置平台时，才可以复制配置文件，该配置文件位于 /perlinstalldirectory/CPAN/Config.pm 中。

使用 CPAN 时，一个明显的方法是使用 autobundle 函数。此函数生成 Perl 安装中所有已安装模块的列表，然后将该列表转储为可以执行的格式，将选择项重新安装到同一台计算机上（更新为最新的 Perl 版本后）或重新安装到另一台计算机上。清单 2 中的代码显示了如何创建新绑定。

				
$ perl -MCPAN -e autobundle
...
Package namespace         installed    latest  in CPAN file
AnyDBM_File                    1.00      1.00  N/NW/NWCLARK/perl-5.8.5.tar.gz
Apache::ASP                    2.57      2.57  C/CH/CHAMAS/Apache-ASP-2.57.tar.gz
Apache::ASP::ApacheCommon     undef     undef  C/CH/CHAMAS/Apache-ASP-2.57.tar.gz
Apache::ASP::Application      undef     undef  C/CH/CHAMAS/Apache-ASP-2.57.tar.gz
Apache::ASP::CGI              undef     undef  C/CH/CHAMAS/Apache-ASP-2.57.tar.gz
Apache::ASP::CGI::Table       undef     undef  C/CH/CHAMAS/Apache-ASP-2.57.tar.gz
Apache::ASP::CGI::Test        undef     undef  C/CH/CHAMAS/Apache-ASP-2.57.tar.gz
Apache::ASP::Collection       undef     undef  C/CH/CHAMAS/Apache-ASP-2.57.tar.gz
Apache::ASP::CollectionItem     undef     undef  C/CH/CHAMAS/Apache-ASP-2.57.tar.gz
Apache::ASP::Date             undef     undef  C/CH/CHAMAS/Apache-ASP-2.57.tar.gz
...
Wrote bundle file
	/export/build/solaris/cpan/Bundle/Snapshot_2004_08_08_00.pm

生成的文件位于 CPAN 安装目录内。可以从这个位置复制此文件，如果正升级到 Perl 的更高版本，那么只需运行 bundle 模块来重新安装所有东西即可：

虽然 bundle 函数很好用，但我必须承认，因为某些原因，我不是非常喜欢将绑定系统作为网络解决方案。首先，绑定依赖于每台计算机具有相同的配置，如果每项配置都相同， 那么这个方法会很好。但是如果具有不同的平台和环境，那么就会很容易发生问题。其次，因为自动绑定功能可以列出安装的每个模块，还可以列出多个包（每个包 可能包含多个模块）。不过，该功能还可以列出对 Perl 的更高版本的引用（作为一些模块更新的源）。

不过，最后的问题是绑定依赖于让一台计算机包含所有模块的最新版本。不能使用这项功能将标准套件升级到最新的版本，无论这些版本是什么，这一限制使系统在网络环境中的使用变得更复杂。

如果想构建定制解决方案，有两种可用方法。您可以使用中心 CPAN 安装 目录，也可以使用中心 CPAN 源 目录。

使用中心 CPAN 安装目录

在网络中配置 CPAN 的相对简单的方法（如果计算机都相同，则此方法很好）是创建在 Network File System（NFS）上共享的单一 CPAN 目录，将 CPAN/Config.pm 文件复制到每台计算机上，然后使用前面讨论过的 CPAN::Shell 技术在每台计算机上安装模块。在主计算机（通常是在 NFS 上共享 CPAN 目录的那台计算机）上安装“基础”模块集合。对于其他每台计算机，构建和安装每个必需模块的过程应该很快，因为源 tarball 已经存在。因此，不必再下载 tarball，这可以节约宝贵的 Internet 带宽和大量时间。

这项技术的主要问题是：对 于完全相同的计算机来说，会浪费处理器时间，您已经编译过一次，再完全重新编译就是在浪费时间。而且您还会将自己置于危险境地，在这种情况下，同一构建目 录可用于多台计算机，这真的不是什么好主意，因为不同的计算机可能同时编译源，从而导致计时错误，此外，在跨平台环境中，进行连接时会出现坏的目标文件。

使用中心 CPAN 源目录

对 上面的解决方案的修正是使用相同源目录和基本 CPAN 配置，但要手工更改配置文件，这样，每台主机的配置信息都是特定于主机的。用这种方法可以解决构建目录的问题，但是仍然要使用 tarball 的本地（即，在您的网络上）缓存版本。清单 3 提供了这类配置文件。

				
# This is CPAN.pm's systemwide configuration file. This file provides
# defaults for users, and the values can be changed in a per-user
# configuration file. The user-config file is being looked for as
# ~/.cpan/CPAN/MyConfig.pm.
$CPAN::Config = {
  'build_cache' => q[200],
  'build_dir' => q[/export/build/solaris/cpan/build],
  'cache_metadata' => q[1],
  'cpan_home' => q[/export/build/solaris/cpan],
  'dontload_hash' => {  },
  'ftp' => q[/usr/bin/ftp],
  'ftp_proxy' => q[proxy.mcslp.pri:8080],
  'getcwd' => q[cwd],
  'gpg' => q[],
  'gzip' => q[/usr/bin/gzip],
  'histfile' => q[/export/build/solaris/cpan/histfile],
  'histsize' => q[100],
  'http_proxy' => q[proxy.mcslp.pri:8080],
  'inactivity_timeout' => q[0],
  'index_expire' => q[1],
  'inhibit_startup_message' => q[0],
  'keep_source_where' => q[/export/build/solaris/cpan/sources],
  'lynx' => q[],
  'make' => q[/usr/local/bin/make],
  'make_arg' => q[-j3],
  'make_install_arg' => q[UNINST=1],
  'makepl_arg' => q[],
  'ncftp' => q[],
  'ncftpget' => q[],
  'no_proxy' => q[],
  'pager' => q[/usr/bin/less],
  'prerequisites_policy' => q[follow],
  'scan_cache' => q[atstart],
  'shell' => q[/usr/local/bin/bash],
  'tar' => q[/usr/local/bin/tar],
  'term_is_latin' => q[1],
  'unzip' => q[/usr/bin/unzip],
  'urllist' => [q[ftp://cpan.etla.org/pub/CPAN], q[ftp://cpan.teleglobe.net/pub/CPAN],
    q[ftp://ftp.demon.co.uk/pub/CPAN/], q[ftp://ftp.flirble.org/pub/languages/perl/CPAN/],
    q[ftp://ftp.mirror.ac.uk/sites/ftp.funet.fi/pub/languages/perl/CPAN/],
    q[ftp://ftp.mirror.anlx.net/CPAN/], q[ftp://ftp.plig.org/pub/CPAN/],
    q[ftp://usit.shef.ac.uk/pub/packages/CPAN/], q[http://cpan.hambule.co.uk/]],
  'wget' => q[],
};
1;
			__END__

需要将所有配置目录参数更改为每台计算机的本地信息，例如，将行 'build_dir' => q[/export/build/solaris/cpan/build], 改为指向本地计算机中的目录。同时，共享主计算机上的 CPAN 源目录，然后将 keep_source_where 参数改为指向 NFS 挂载的目录。

不 幸的是，这个解决方案也存在一些问题。首先，无法方便地记录要在每台计算机上安装的模块。还会遇到下面的问题：保持源目录（以及其他 CPAN 目录）中的信息正确且最新，而无需更新或下载 tarball 的更新版本，同时不会扰乱计算机的现状。这个问题可以导致每个系统中已安装模块版本之间的微小但很重要的差别，这是我们正尝试解决的关键问题。

使用 CPAN 创建严格安装

以 上两种解决方案的问题在于它们都依赖于对 CPAN 的使用，以及一些使 CPAN 工作的配置文件的操作。在局域网内（LAN），即使使用上面的技巧，CPAN 也不是理想的解决方案。因此，需要避开这些系统限制。为此，我将展示如何配置主分布，如何为每个平台创建安装集合，然后在每台计算机上运行安装。

配置主分配

在第一步中，将使用我们已经介绍过的一些元素。开始先像往常一样配置一台计算机，并设置默认模块集合。然后，使用 NFS 设置共享目录，使用这个目录将必需的文件分布到网络中的其他计算机中。现在编辑清单 4 中看到的 $destdir 变量，然后运行清单 4 脚本。该脚本执行以下三项操作：

• 标识模块。
• 下载源文件。
• 将源文件复制到分发目录中。

第 一个阶段通过检查 perllocal.pod 文件的内容，确定已安装模块的列表。每次使用 MakeMaker 系统安装模块时，都要更新这个文件。通过使用该文件，而不是使用 CPAN 中的内置模块，可以获取安装基础 Perl 时一起安装的第三方模块的列表。在第二阶段中使用 CPAN 下载源 tarball，这项操作发生最后复制 tarball 或 .zip 文件之前，通过在 CPAN 自身内部配置的任意一个方法来实现。作为这个过程的一部分，还要创建已复制模块的列表，在其他计算机上安装文件时要使用这个列表。

				
use CPAN;
use Config;
use File::Copy;
use File::Spec::Functions;
# Set up the directories to store the module packages
my $basedestdir = catfile('export','cpaninst');
mkdir($basedestdir);
my $destdir = catfile($basedestdir,'srcs');
mkdir($destdir);
# Extract a list of the third party modules installed on this machine
my $files = {};
my $podfile = catfile($Config{'archlibexp'},'perllocal.pod');
open(DATA,$podfile) or die "Can't open module list ($podfile): $!";
while(<DATA>)
{
    if (m/.*C<Module> L<(.*)>/)
    {
        my ($module) = split /\|/,$1,0;
        my $mod = expand('Module',$module);
        next unless $mod;
        $mod->get(); #Make sure to download the version again, in case we no
                        #longer have it locally
        $files->{$mod->{RO}->{CPAN_FILE}} = 1; #Save the location of the file
    }
}
close(DATA);
# Now copy each source installer to the source destination directory
# We save a copy of the module file, for reference, as part of the process
my $modulelist = catfile($basedestdir,'modules.lst');
open(DATA,">$modulelist") or die "Can't open the module list file ($modulelist): $!";
foreach my $file (keys %{$files})
{
    my $src = catfile($CPAN::Config->{'keep_source_where'},$file);
    my ($vol,$path,$filename) = splitpath($file);
    my $dest = catfile($destdir,$filename);
    copy($src,$dest) or warn "Copy of $src failed: $!\n";
    print DATA "$filename\n";
}
close(DATA);

现在就有了包含所有源安装包的目录，使用该目录可以为那些将 给其分布相应 Perl 模块的每个平台构建一组已经编译的分布。下面将如何继续则取决于您的环境。如果具有同构环境，那么只需对整个网络将下一阶段的操作执行一次即可。然而，如 果拥有一个具有各种不同平台的异构网络，那么需要对每个不同环境重复下一步骤。

为每个平台创建安装集合

对于每个平台，都必须提取源文件，运行 MakeMaker，然后运行安装程序。要自动执行此任务，则需要使用清单 5 中的脚本。不幸的是，并不是所有的 MakeMaker 安装都是完全自动的，所以每次构建分布时都必须遵循交互系统，例如，设置目录位置或默认选项。

				
srcdir="/export/cpan"
srcfile="$srcdir/module.lst"
platformdir="/export/cpan/solaris-x86"
for file in `cat $srcfile`
  do
    cd $platformdir
    tar zxf $srcdir/$file
    dir=`echo $file|sed -e "s/\.tar\.gz//g"`
    cd $dir
    perl Makefile.PL
    make
done

在每台计算机上运行安装

运行清单 5 中的脚本后，您会拥有一个目录，该目录中包含给定平台的所有“准备安装”模块。要在使用相同平台的其他任何计算机上安装这些模块，则只需转入每个目录并运行 make install 即可。同样，可以使用脚本完成这个过程，比如清单 6 中的脚本。

				
srcdir="/export/cpan"
srcfile="$srcdir/module.lst"
platformdir="/export/cpan/solaris-x86"
for file in `cat $srcfile`
  do
    cd $platformdir
    tar zxf $srcdir/$file
    dir=`echo $file|sed -e "s/\.tar\.gz//g"`
    cd $dir
    make install
done

结束语

尽 管 Perl、CPAN 和 MakeMaker 系统提供了一些功能，但仍然无法仍将 Perl 模块的安装和分布完全自动化。但是可以使该过程对于某一范围内的计算机更简单些。单个模块都有自己的配置，单个平台也有自己的细微差别，这些使它们变得比 原先更加复杂。通过使用本文中的脚本，可以减少许多困难，同时减少通常可能与这个过程有关的时间花费。