return $self;
}
+method with_substr_key_obj () {
+ $self->_with_object_meta_key(
+ substr => sub {
+ my ($hash, $obj) = @_;
+ return substr($obj->name, 0, 3);
+ }
+ );
+ return $self;
+}
+
method with_substr_old () {
foreach my $row ($self->all) {
my $substr = substr($row->name, 0, 3);