PERL - problem mit regular expression

[it00x30]

hi,

versuche gerade meine ersten schritte in perl und bin auf ein problem gestossen:

ich will eine zeile die so ausschaut
blablabla = "blablalbalba",

in eine zeile umwandeln die so auschschaut
blablabla = {blablabla},

hab dazu versucht mit
s/.*=.*".*",/.*=.*{.*},/
zu ersetzen.

er erkennt zwar die richtigen zeilen im file (also funktionert der erste teil - allerdings anstatt nur die anführungszeichen zu ersetzten schreibt er mir meine ersetzungsanweisung ins file, also .*= ...

wo liegt hier mein denkfehler? ich hab nämlich gedacht, dass er .* einfach mit dem string ersetzt, den er vorfindet (also das blablabla)