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
Сайт использует файлы cookie для корректной работы и повышения удобства. Нажимая кнопку «Принять» или продолжая пользоваться сайтом, вы соглашаетесь на их использование в соответствии с Политикой в отношении обработки cookie ООО «ППГ», в том числе на передачу данных из файлов cookie сторонним статистическим и рекламным службам. Вы можете управлять настройками cookie через параметры вашего браузера