mah du bist a wirklicher schatz:
so hab ichs eh auch gehabt..muss gucken, vielleicht hab ich nen fehler gemacht... jedenfalls hat er 0 ausgegeben.

while($formula =~ s/\(([^\(]*?)\)/calc($1)/eg)

verrätst du mir jetz noch was das bedeutet? eg ...hat was mit gleichheit zu tun.
das andere hab ich jetzt auf die gachn nicht gefunden?