根据 for last
( http://perldoc.perl.org/functions/last.html ) 的 perl 手册,last
不能用于跳出do {}
循环,但它没有提到替代方案。我正在维护的脚本具有以下结构:
do {
...
if (...)
{
...
last;
}
} while (...);
我很确定他想走到循环的结尾,但它实际上退出了当前的子例程,所以last
如果有人可以推荐更好的方法,我需要更改或重构整个循环。