一个 Plack 应用程序如何影响另一个？答案

【问题标题】：How to can one Plack application affect another one?一个 Plack 应用程序如何影响另一个？
【发布时间】：2011-05-19 20:50:15
【问题描述】：

我有这个：

use Plack::Builder;
my $config_app = sub {...};
my $app = sub {...}

builder {
    mount "/admin" => $config_app;
    mount "/"   => $app;
};

$config_app 将配置值保存到文件 app.cfg 中，$app 将其加载为配置文件。不需要在每个请求中读取配置文件。需要在应用程序开始时读取它，并在更改时重新读取它。

实现这一目标的最佳方法是什么？

我唯一的想法是：应用程序会记住最后的config_read_time，并且在每个请求中都会检查app.cfg的修改时间。如果文件被修改，将重新读取它。

这里有更好的解决方案吗？（意味着 $config_app 和 $app 之间的一些消息传递，例如，当 $config_app 保存新配置时 will send some message to $app: re-read the config。

【问题讨论】：

标签： perl plack psgi

【解决方案1】：

虽然在$config_app 中调用$app（有点像内部重定向）并非不可能，但我个人建议不要这样做。

如果您创建一个单独的普通 Perl 类（MyApp::ConfigFile 或其他）并从 $app 和 $config_app 对单例对象调用该方法，应该会容易得多。请注意，无论如何，该技术仅适用于单进程 Web 服务器环境。如果您检查修改时间并重新阅读，则可以在 Starman Web 服务器等分叉环境中工作。

【讨论】：

【解决方案2】：

有很多方法可以监控配置文件。

像这样编写一个配置检查例程：

use constant MIN_CHECK_DELAY => 5;  #SECONDS
use constant CONFIG_FILE => '/etc/wtf.conf';

{
    my $last_changed = 0;
    my $last_check   = 0;

    sub load_config {

        return if $last_check + MIN_CHECK_DELAY <= time;

        return if (stat(CONFIG_FILE))[9] <= $last_check;

        # Do stuff here.

        return;
    }

}

您需要注意的主要事情是不要在文件更改的那一秒内一遍又一遍地重新加载。

现在在您可能需要加载新一轮配置的任何地方调用 `load_config()。由于它总是成功，因此您无需进行测试或做任何比将其洒在方便的地方更聪明的事情。就像在您的应用处理程序的顶部一样。

这对于打开正在运行的进程的日志记录或强制重新加载某些模块等操作非常有用。没有很多使用缩放不会咬你。

您知道，如果您有一堆机器为此提供服务，它就无法扩展。您必须 rsync 更改文件的文件，或者更糟的是将它们放在 NFS 挂载上。

这是一个激进的概念：为什么不使用数据库？

我听说最近很酷的孩子们正在试验基于数据库的网络应用程序，而且它们实际上运行良好。

说真的，编程和构建系统的有趣之处在于在设计权衡之间进行选择。在某些极端情况下，传递更改的文件会取得巨大的成功，而我尖刻的数据库评论却是完全愚蠢的。不确定该用例是什么，但它可能存在。 您了解您的用例。 尝试一下。不要害怕变得有点愚蠢。有时，看起来非常愚蠢的解决方案却出奇地优雅。但是，如果这个想法被证明是愚蠢的，那就从经验中学习并继续前进。

【讨论】：