#!/bin/ksh
# Stack operators
function push {
    typeset var=$1
    shift
    eval "set -A $var \"\$@\" \"\${$var[@]}\""
}

function pop {
    typeset var=$1
    eval "echo \${$var[0]}"
    eval "set - \"\${$var[@]}\""
    shift
    eval "set -A $var \"\$@\""
}