Hier kann man statt eval auch Math::Expression::Evaluator nehmen und sich um den Sicherheitsaspekt keine Sorgen machen.

(Das Modul hat auch eine Funktion, die einen mathematischen Ausdruck mittels eval() in ein perl-sub kompiliert, aber natürlich nur, wenn die Eingabe vorher erfolgreich geparst wurde.)