Select Code to Download

sub get_by_string {
   my ($this, $field, $property, $value) = @_;
...
   return grep { $_->{$property} == $value } @{$this->{$field}};
}

my @items = $obj->get_by_string('item','name',$name);
my @users = $obj->get_by_number('user','id',$id);