perl 中 lable 请教

ssming0622

UID: 11844
帖子: 48
积分: 110
在线时间: 3 小时

1^# ssming0622 发表于 2008-09-10 16:14

perl 中 lable 请教

大家好，
请教大家一个关于perl  lable的问题。

for($i=0; $i < 6; $i++) {

   。。。。。。

if ($data_count_of_six==6) {
goto AAScheck;
}
}

# lable AAS check
AAScheck:
语句1；
语句2；
  。。。。。。
语句n；

在这里怎么结束lable AAScheck 呢？

撒哈拉里的鱼

UID: 25861
帖子: 2
积分: 4
在线时间: 10 分钟

2^# 撒哈拉里的鱼发表于 2008-09-10 16:18

goto就是流程转跳，没有所谓的结束。

hitsubunnu

UID: 19600
帖子: 1
积分: 2
在线时间: 10 分钟

3^# hitsubunnu 发表于 2008-09-10 16:31

没看懂问题

感觉是用 last 跳出循环

zzyong08

UID: 19033
帖子: 9
积分: 20
在线时间: 10 分钟

4^# zzyong08 发表于 2008-09-13 23:57

是呀, 和c中的goto一样,没有退出这一说吧.

QUOTE:

原帖由撒哈拉里的鱼于 2008-9-10 16:18 发表
goto就是流程转跳，没有所谓的结束。