Moose：如何在第二个属性中保留属性原始值并避免初始化错误

你遇到的核心问题是Moose非lazy属性的初始化顺序不固定，导致original_url的default回调可能在url赋值前执行，进而触发类型错误。以下是两种可靠的解决方法：

方法1：利用BUILD方法初始化原始URL #

BUILD方法是Moose对象构造流程的最后一步，会在所有属性完成初始化后执行，此时url已经有了有效值，能安全地赋值给original_url：

package Foo;

use Moose;

has 'url' => (
    is => 'rw',
    isa => 'Str',
    required => 1,
);

has 'original_url' => (
    is => 'ro',
    isa => 'Str',
    init_arg => undef,  # 禁止外部传入，确保只能由初始URL生成
);

sub BUILD {
    my $self = shift;
    # 直接修改属性存储，绕过只读限制（仅在对象构建阶段允许）
    $self->{original_url} = $self->url;
}

这种方式逻辑清晰，完全规避了初始化顺序的问题，而且init_arg => undef能防止用户误传original_url，保证原始URL的准确性。

方法2：使用属性依赖强制初始化顺序 #

如果想保留default回调的写法，可以给original_url添加depends_on属性，强制Moose先初始化url：

package Foo;

use Moose;

has 'url' => (
    is => 'rw',
    isa => 'Str',
    required => 1,
);

has 'original_url' => (
    is => 'ro',
    isa => 'Str',
    default => sub { shift->url },
    depends_on => ['url'],  # 指定依赖url，确保url先完成初始化
);

depends_on会告诉Moose调整初始化顺序，确保url在original_url之前被赋值，这样default回调就能拿到正确的初始URL值。不过这种方式对非lazy属性的兼容性不如BUILD方法稳定，推荐优先用第一种方案。

验证效果 #

两种方法都能实现你的需求：

• 构造对象时只需传入url，无需重复指定原始URL
• 可以随意修改url属性获取当前地址
• 通过对比url和original_url就能判断地址是否被修改

内容的提问来源于stack exchange，提问作者Wouter Verhelst