....
my ($self,$args) = @_;
my $find = $self->{where};            
${find}->{name} = 'test';