perl - 使 Perl 脚本检测也在 Perl 中的单独配置模块中的更改

Question

天，

我们有一个 Perl 脚本，它正在处理来自主要网站的前端服务器的地理定位请求。该脚本是一个代理，提供额外的业务逻辑来解释 COTS 产品返回的数据，该产品提供给定 IP 地址的数据，例如国家、连接类型、路由类型、运营商等。

此地理服务目前在 COTS 后端处理每秒约 1,000 个请求的峰值负载。顺便说一句，它实际上是在为 5,000 个请求提供服务。从其直接位于代理层之前的专用负载平衡/缓存层。

我最近不得不修改这个代理的行为，以允许我们在网站上看到的新类别的连接出现，这会导致一些问题。

原版剧本，不是我设计的!顺便说一句，已经使用脚本本身中的配置项和单独的 Perl 片段中的其他项混合构建。正如在对我的更改进行同行评审期间非常正确地指出的那样，我们可能应该将所有配置项迁移到单独的位置，而不是继续混合使用嵌入式和单独的配置项。

现在我想更进一步，将所有配置项(创建为单独的 Perl 哈希)放入单个配置文件中。

目前，我们必须停止并重新启动整个应用程序以重新加载新的配置项，考虑到流量水平，这有点不方便，即使在两个独立的数据中心有四个代理实例，所以我们实际上永远不会丢失服务。

我怀疑我将不得不求助于保留一个计时器，或者可能是一个请求计数器，并对相关配置文件执行统计。或者甚至可能为配置文件配置了 TTL，然后每十分钟左右重新加载一次。

但是有没有办法让 Perl 自动重新加载它以前加载的文件的更新版本？我正在考虑类似于 Apache mod_perl 模块提供的行为。

干杯，

Answer 1

罗布，有几点:

1) 最好将配置读取器抽象为 API，而不是直接从 Perl 哈希中读取。这样，对该 API 的任何调用都可以反过来决定需要对配置执行什么操作(例如，计时器到了吗？配置文件时间戳是否更改？)。

与往常一样，这还有一个额外的好处，即允许您稍后重新设计配置(perl 有 => xml => 数据库)，而无需更改任何软件。

2)鉴于它是一台服务器，我还建议通过特殊请求类型提供按需配置重新加载功能。这允许您通过向服务器发送命令而不是弹回它来强制重新加载配置(例如，在更新配置文件之后)。

顺便说一句，如果您遵循＃1，＃2 很容易做到，因为“重新加载配置”处理程序需要做的就是重置“配置需要在下一次配置 API 调用时重新加载”标志。

3)如果您坚持将配置作为没有 API 的散列(例如，出于性能原因以消除 API 子例程调用，这似乎是合理的，但不太可能有太大帮助)，那么您需要将配置放入您的静态变量中类，并让该类提供“设置新配置”方法。然后服务器将设置一个计时器，并在计时器调用时(或在收到来自 #2 的“重新加载配置”命令时)将检查时间戳和/或配置文件的校验和是否与您上次调用的时间不同并重新加载。