Можно ли сделать что-то вроде Perl?
foreach (@tokens) {
if (/foo/){
# simple case, I can act on the current token alone
# do something
next;
}
if (/bar/) {
# now I need the next token, too
# I want to read/consume it, advancing the iterator, so that
# the next loop iteration will not also see it
my $nextToken = .....
# do something
next;
}
}
Обновление: Мне нужно это в Perl, но ради любопытства: на других языках есть опрятный синтаксис?