package DBM::Deep::Array;

sub _get_self {
    eval { tied( @{$_[0]} ) } || $_[0]
}

package DBM::Deep::Hash;

sub _get_self {
    eval { tied( %{$_[0]} ) } || $_[0]
}