s;{.*?};{$sub[$n++]};g;