Perl ist standardmäßig greedy, versucht also möglichst große Blöcke für dein (.*) zu finden.
http://www.troubleshooters.com/codecorn/littperl/perlreg.htm#Greedy
Ich kann eigentlich kein Perl, aber nach dem Link da zu urteilen musst du (.*?) statt (.*) schreiben