从 Catalyst::Plugin::Cache::FileCache 升级到 Catalyst::Plugin::Cache

Question

我正在编写一个构建脚本来构建 Catalyst 应用程序，显然它是一个较旧的应用程序，因为它使用 Catalyst::Plugin::Cache::FileCache 而不是支持 FileCache 选项的较新的 Catalyst::Plugin::Cache 。通过 Makefile.PL 进行构建时，我无法使用 cpanm，因为 Catalyst::Plugin::Cache::FileCache 不再可检索。 :-(

找到实现这一点的方法对我来说是有问题的。

我想我可以更改应用程序以使用 Catalyst::Plugin::Cache 但我没有找到清晰的文档或任何简单的方法目前

该应用程序使用此...

__PACKAGE__->config( name => 'Stats', cache =>{storage=>'./tmp'} );

http://搜索。 cpan.org/~mramberg/Catalyst-Plugin-Cache-FileCache-0.7/lib/Catalyst/Plugin/Cache/FileCache.pm 是以下文档已弃用的模块。

Catalyst::Plugin::Cache 的新文档在这里..... http://metacpan.org/pod/Catalyst::Plugin::Cache

在我的一个模型中，我有这个......

__PACKAGE__->config(
                schema_class => 'Schema::STATS',
                connect_info => [
                                 'dbi:ODBC:DSN=....;driver=...;Server=...;database=...;RB_CONFIG=...;',
                                 'USER',
                                 'PASS',
                                 {limit_dialect=>'GenericSubQ',
                                  on_connect_do => ['set dateformat ymd'],
                                  cursor_class => 'DBIx::Class::Cursor::Cached'
                                 }
                                ],
               );


sub COMPONENT {
  my $self = shift->NEXT::COMPONENT(@_);
  $self->schema->default_resultset_attributes({ cache_object => Cache::FileCache->
       new({ namespace => 'Schema::STATS' }), cache_for=>3600});
  return $self;
}

我现在希望做尽可能少的更改这个应用程序，但有人知道有什么更简单的方法可以进行一些更改，我需要切换到较新的 Catalyst::Plugin::Cache 吗？

更糟糕的是，我总是可以打包旧的 Catalyst::Plugin::Cache： :FileCache 源并安装它，但我希望有一种更简单的方法来使用新的。

非常感谢！ 珍妮

Answer 1

__PACKAGE__->config(
  'Plugin::Cache' => {
    backends => {
      default => {
        class => "Cache::FileCache",
        cache_root => "./tmp",
        namespace => "Pick Something",
    }
  }
);

删除 Plugin::Cache::FileCache 并添加 Plugin::Cache 应该可以完成大约 90% 的工作。 $c->cache 将继续按您的预期工作，并且它将是一个普通的 Cache::FileCache 对象。