Searched refs:_dclone (Results 1 – 3 of 3) sorted by relevance
63 BEGIN { *_dclone = \&CPAN::Meta::Converter::_dclone }127 return @{ _dclone($value) } if ref $value;167 return _dclone($value) if $value;191 return _dclone($value) if ref $value;569 my $struct = _dclone($self);
188 push @return, &_dclone($element);195 $return{$key} = &_dclone($arg->{$key});1526 return _dclone $BLOCKS{$arg};1599 return _dclone $SCRIPTS{$arg};1630 return _dclone \%BLOCKS;1657 return _dclone \%SCRIPTS;1717 return _dclone \%GENERAL_CATEGORIES;1788 return _dclone \%BIDI_TYPES;2124 return _dclone \%CASEFOLD;2822 return @{_dclone $list_ref};[all …]
53 sub _dclone { subroutine60 return [ map { _dclone( $_ ) } @{$ref} ] if 'ARRAY' eq $reftype;61 return { map { $_ => _dclone( $ref->{$_} ) } keys %{$ref} } if 'HASH' eq $reftype;64 my $new = _dclone(${$ref});71 return ref $data ? _dclone( $data ) : $data;1425 my $converted = _dclone($self->{data});