LINUX.ORG.RU

perl - вывод значений массива %arr


0

0

Есть массив %arr (у каждого ключа одно значение) нужно составить 2 строки формата $str1="$key1,$key2,$key3 и т.д" и соотв. $str2="$val1,$val2,$val3 и т.д" нужно, чтобы все значения между собой разделялись запятыми, в начале и конце строки запятых быть не должно. каким образом можно это сделать? (какой функцией или их последовательностью) такая комбинация ставит запятую в начале файла :( while (($key,$value) = each %series){ $str="$str,$key"; $str2="$str2,$value"; };

anonymous

Re: perl - вывод значений массива %arr

$str1 = join ',', keys %arr;
$str2 = join ',', values %arr;

idle ★★★★★ ()
Вы не можете добавлять комментарии в эту тему. Тема перемещена в архив.