$gesamt_total soll die summe aller $gesamt_Ticket sein.

<loop code=perl>

#gesamt_Ticket ist das Ergebnis#

$preis_Ticket=$preis_Ticket;
$gesamt_Ticket=$anzahl_Ticket * $preis_Ticket;

$gesamt_Ticket =~ tr/./,/;
$gesamt_Ticket = reverse $gesamt_Ticket;
$gesamt_Ticket = reverse $gesamt_Ticket;
#gesamt_total ist die Summe aller gesamt_Ticket#

$gesamt_total = sprintf('%.02f',$gesamt_total);
$gesamt_total =~ tr/./,/;
$gesamt_total = reverse $gesamt_total;
$gesamt_total = reverse $gesamt_total;

$anzahl_Ticket x Ticket = $gesamt_Ticket

</loop>