The Perl Toolchain Summit needs more sponsors. If your company depends on Perl, please support this very important event.
package Template::Refine::Processor::Rule::Transform::Replace;
use Moose;

with 'Template::Refine::Processor::Rule::Transform';

has 'replacement' => (
    is       => 'ro',
    isa      => 'CodeRef',
    required => 1,
);

sub transform {
    my ($self, $node) = @_;
    return $self->replacement->($node);
}

1;