my $counter = 0;
s/ Ausdruck von oben / (++$counter % 2 == 0) ? "$1\{&$2&\}$3" : "$1$2$3" /gex;