Замена только до N совпадений в строке

Как в Perl написать регулярное выражение, которое заменяет только до N совпадений в строке?

То есть я ищу золотую середину между s/aa/bb/;и s/aa/bb/g;. Я хочу разрешить множественные замены, но только до N раз.