diff --git a/lib/DBIx/Class/Manual/Cookbook.pod b/lib/DBIx/Class/Manual/Cookbook.pod index 2377fc5c2..ab58aaaf9 100644 --- a/lib/DBIx/Class/Manual/Cookbook.pod +++ b/lib/DBIx/Class/Manual/Cookbook.pod @@ -1114,7 +1114,7 @@ C: my ($me, $rest) = @_; return { %$me, - map { ($_ => mk_hash(@{$rest->{$_}})) } keys %$rest } + map { ($_ => mk_hash(@{$rest->{$_}})) } keys %$rest }; } @@ -1127,7 +1127,7 @@ C: $rs->result_class('My::HashRefInflator'); my $datahashref = $rs->next; - foreach my $col (keys $datahashref) { + foreach my $col (keys %$datahashref) { if(!ref($datahashref->{$col}) { # It's a plain value }