set -A arrayvar $(perl -e ...)