Select Code to Download

sub new {
    my ($class, $args) = @_;
    $args->{value} = 23;
    return $class->SUPER::new($args);
}

sub PREBUILD {
    my ($class, $args) = @_;
    return { %{$args}, value => 23 };
}