my $i = 0;
s/ab(?(?{++$i>5})(?!))/cd/g;