source: trunk/essentials/sys-apps/gawk/test/aryprm2.awk

function f(a) {
        delete a
        a *= 5
}

BEGIN {
        f(arr)
}