Select Code to Download

sub clone {
    my ($value) = @_;
...
        return $value
    }
}

multi sub clone (Object where { $_->can('clone') } $value) {
    return $value->clone;
...
multi sub clone (HashRef $value) {
    return map { $_ => clone( $value->{$_} ) } keys %$value;
}