Rexx 与 AIX

核心提示：REstructured eXtended eXecutor (Rexx) 语言可为担任 AIX® 开发人员或管理员的您做什么呢？它的功能非常强大，甚至超乎您的想象，Rexx 与 AIX，特别是在 2006 年末由官方首次发布的 AIX 变种——Open Object Rexx (ooR

REstructured eXtended eXecutor (Rexx) 语言可为担任 AIX® 开发人员或管理员的您做什么呢？它的功能非常强大，甚至超乎您的想象，特别是在 2006 年末由官方首次发布的 AIX 变种——Open Object Rexx (ooRexx) 更是如此。

您需要对此脚本语言有更多的了解，清单 1 显示了其中的一个方面：

清单 1. 使用 Rexx 进行字数统计

　　　parse arg filein
　　　count. = 0
　　　do while lines(filein) > 0
　　　　　input = linein(filein)
　　　　　do n = 1 to words(input)
　　　　　　　w = word(input, n)
　　　　　　　count.w = count.w + 1
　　　　　　　if count.w = 1 then word_list = word_list w
　　　　　end
　　　end
　　　
　　　do i = 1 to words(word_list)
　　　　　w = word(word_list, i)
　　　　　say w count.w
　　　end

这是一个取消注释的 Rexx 程序。您能猜到它将执行什么操作吗？我相信您可以，即使您从未学习此语言也能看出来。此程序将执行下列操作：

打开其名称显示在命令行上的文件

读取该文件中的每行内容

将每行内容分成单个的字

累计字数

报告出现的总字数

在安装了 Rexx 的 UNIX® 计算机上，如果将此程序作为 Rexx word_count.Rexx draft.xml 运行，则输出将类似于清单 2。

清单 2. 字数统计程序的典型输出

　　　.
　　　.
　　　.
　　　included 3
　　　in 55
　　　file 3
　　　.
　　　.
　　　.

如果您的桌面上未 安装 Rexx，请不用担心，我稍后还将谈到这些可用性问题。

可读的 Rexx