#####____________________Konstanten in Perl___________________

Es gibt in Perl zwei Arten von Konstanten....

Stringkonstanten für Text
Zahlenkonstanten

Stringkonstanten haben sie ja bereits kennen gelernt wie z.B.

#!/usr/bin/perl -w

print "Ich bin eine String-Konstante\n";
print 'Ich bin auch eine String-Konstante';
print "\n";

Zahlenkonstanten werden direkt im Quellcode geschrieben wie beispielsweise.....

#!/usr/bin/perl -w

print 100;
print "\n";
print 99.99;
print "\n";
print 100_000_000.1234;  #100000000.1234
print "\n";
print 1e-2;              #0.01
print "\n";
print 0b0101;            #binäre Darstellung von 5
print "\n";
print 0111;              #oktale Darstellung von 73
print "\n";
print 0xff;              #hexdezimale Darstellung von 255
print "\n";

Hier sehen sie einige Möglichkeiten wie man Zahlenkonstanten in Perl ausgeben kann.
C/C++ Programmieren werden sich jetzt Fragen ob es auch möglich ist symbolische
Konstanten wie z.B. mit #define zu definieren.
Hier nun die Variante für Perl.......

use constant MWST => 15
print MWST;
print "\n";

Damit werden im Quellcode alle Zeichen MWST durch den Wert 15 ersetzt was uns die Ausgabe auch bestätigt.