anaboe.net

XRefEUR.pm - Perlmodul zur Währungsumrechnung von und nach Euro

Zielstellung

XRefEUR.pm - Perlmodul zur Währungsumrechnung von und nach Euro.

Modulversion: 0.9 Beta

Source

Perl - Code

use XRefEUR;

# Initialisierung
my $exc = XRefEUR->new();
$exc->initializeData() || die $exc->ErrorMsg;

# Holen aller aktuell verfügbaren Kurse
my $kurse = $exc->getAllXRef();
while( my($k,$v) = each %$kurse ) {
  print "$k => $v\n";
}

# Holen eines spezifischen Kurses mit Datum
my $kurs = $exc->getSpecXRef('USD');
my $datum = $exc->getXRefDate();
print "Kurs vom $datum: 1 Euro = $kurs USD\n";

# Umrechnen von Fremdwährung in Euro
my $kurs = $exc->convertToEUR(1.2, 'USD');
print "1.2 USD = $kurs EUR\n";

# Umrechnen von Euro in Fremdwährung
my $kurs = $exc->convertFromEUR(1.2, 'USD');
print "1.2 EUR = $kurs USD\n";

Erläuterungen

Das Modul XRefEUR.pm stellt dem Anwender den objektorientierten Zugriff auf die tagesaktuellen Euroumrechnungskurse zur Verfügung. Als Datenquelle wird eine von der EZB bereitgestellte XML-Datei genutzt.

Siehe ausführliche Dokumentation.