Andrew Dunstan <andrew@dunslane.net> writes:
> Something like:
> (my $bkival = $row->{bki_values}) =~ s/"[^"]*"/"xxx"/g;
> my $atts = {};
> @{$atts}{@attnames} = split /\s+/, $bkival;
> might work better.
I committed Alvaro's suggestion (undef at the bottom), but feel
free to clean it up if you like this way better.
regards, tom lane