我有一个从服务返回的perl变量$ results。该值应该是一个数组，$ results应该是一个数组引用。但是，当数组中只有一个项目时，$ results将被设置为该值，而不是包含该项目的引用数组。
我想在预期的数组上做一个foreach循环。没有检查ref($ results)eq’ARRAY’，是否有任何方法可以获得与以下内容相同的内容：
foreach my $result (@$results) {
# Process $result
}
该特定的代码示例将用于引用，但将会为简单的标量提出抱怨。
编辑：我应该澄清一点，我无法改变从服务返回的内容。问题是，当只有一个值时，该值将是一个标量，当有多个值时它将是一个数组引用。
解决方法
我不知道有什么别的办法：
06000
版权声明：本文内容由互联网用户自发贡献，该文观点与技术仅代表作者本人。本站仅提供信息存储空间服务，不拥有所有权，不承担相关法律责任。如发现本站有涉嫌侵权/违法违规的内容， 请发送邮件至 dio@foxmail.com 举报，一经查实，本站将立刻删除。
