Ich hätte gehofft, dass Perl das Punkt-vor-Strich von Haus aus schon macht ;-)

Ansonsten folgende Idee zum Selber-Bauen:

1. Operanden und Operatoren einlesen und in einem Array ablegen, sodass dann z.B. sowas vorliegt: @list = ( 5, '*', 3, '+', 1, '*', 2 );

2. Nach der Eingabe den Array durchwandern; wenn ein Operator "Punkt" gefunden wurde, Operation mit Element davor und dahinter durchführen und alle drei Elemente durch das Ergebnis ersetzen.

3. Danach dann die noch offenen "Strich" Operationen durchführen lassen.

4. Ergebnis präsentieren.