(例如使用split?)
寻找清楚,直截了当的回答首先(但是添加任何有趣的信息之后).
@tokens = split(/:/,"a:b:c:d"); foreach my $token (@tokens) { .... }