13 lines
355 B
Awk
13 lines
355 B
Awk
|
function process_array(arr, name, process, do_arrays, i, new_name)
|
||
|
|
{
|
||
|
|
for (i in arr) {
|
||
|
|
new_name = (name "[" i "]")
|
||
|
|
if (isarray(arr[i])) {
|
||
|
|
if (do_arrays)
|
||
|
|
@process(new_name, arr[i])
|
||
|
|
process_array(arr[i], new_name, process, do_arrays)
|
||
|
|
} else
|
||
|
|
@process(new_name, arr[i])
|
||
|
|
}
|
||
|
|
}
|