Schau dir mal Text::Balanced an. Damit kannst du alle Möglichen mehrere ineinder verschatelten Kommentare auslesen.

Aber mit einer Regex würde es auch gehen, ist nur etwas schwerer.