Mehrwertsteuer berechnen ?

Computer: Software & Programmierung Perl & CGI
#1

Ich hab mal ein kleines Problem.
Und zwar habe ein mir vor kurzem einen kleinen Onlinshop installiert und möchte dieses jetzt so ändern das bei jedem Bestellvorgang die im Preis enthaltene MwSt anezeigt wird, nur komme ich mit der Rechnung nicht ganz klar, da ich nur den Endpreis (Brutto) habe.
wie kann ich nun von diesem Wert die enthaltene MwSt berechnen.

Denn soviel ich weiß ist

Netto*16/100 =Brutto
Brutto - Netto = MwSt
z.B

8,62*16/100=10

10-8,62=1,38
Also
Netto=8,62
Brutto=10
MwSt=1,38

nur wie kann ich jetzt den Netto Betrag errechnen umdamit auf die MwSt zu kommen. Der Brutto Betrag liegt im Script als Variable $Brutto vor

Geht das wenn ich die Rechnung so aufstelle

$Netto*16/100=$Brutto
$Brutto - $Netto = $MwSt

Dieser Betrag ist inklusive $MwSt Mehrwertsteuer

Sorry wenn es etwas durcheinander klingt, aber ich hoffe das mich trotzdem einer Versteht und eine Idee oder lösung hat

#2

Das is ganz simpel.

Netto * 1,16 = Brutto

daraus folgt

Brutto / 1,16 = Netto

also z.b. Endpreis 99,-
99 / 1,16 = 85,34 Netto

Die MwST ist natürlich die Differend 99 - 85,34

#3

Danke genau das hab ich gesucht

#4

Naja klappt ja prima.
jetzt benutze ich es so

$brutto=10;
$xxx=1.16;
$netto=$brutto / $xxx;
$mwst=$brutto-$netto;

die Mehrwertsteuer wird dann ausgegeben
print „inklusive $mwst DM Mehrwertsteuer“;

Nur das Problem ist jetzt das ergebniss :smile:
Denn die in 10,.DM enthaltene Mehrwertsteuer wird mit 1.37934… ausgegeben!!!

Gibt es in Perl eine Funktion mit der ich das Ergebniss auf 2 Stellen nach dem Komma runden kann???

#5

Aus der Perl-Dokumentation:

printf("%.3f", 3.1415926535); # prints 3.142

MfG Bruno

#6

Hi,

printf("%.3f", 3.1415926535); # prints 3.142

und wenn man nicht direkt ausgeben will:

perldoc -f sprintf

Cheatah