|
projekte.pl |
#!/usr/local/bin/perl -w use TBI; use strict; my $ang = TBI->open("Angestellte"); my $teilnehmer = TBI->open("ProjektTeilnehmer"); my $projekte = TBI->open("Projekte"); foreach my $key ($teilnehmer->keys) { my %ang = $ang->fetch($key->{'persid'}); my %projekt = $projekte->fetch($key->{'projektid'}); printf "%-32s %s\n", $projekt{'name'}, $ang{'name'}, "\n"; } |
Für viele Anwendungen kommt eine Abstraktion entgegen,
die zwischen der vollen Mächtigkeit relationaler Datenbanken
auf der einen Seite und den schlichten assoziativen Arrays
auf der anderen Seite angesiedelt ist.
| |
TBI bietet analog zu DBI eine abstrakte Schnittstelle
für Tabellen mit einem Primärschlüssel (darf aus einem
oder mehreren Feldern bestehen) und einer beliebigen Anzahl
weiterer Felder.
| |
Im Vergleich zu assoziativen Arrays fällt die Problematik
weg, einen Datensatz mit Hilfe eines Feldtrenners
selbst zu zerlegen und zusammenzusetzen.
| |
TBI kann auf recht effiziente Weise auf relationale
Datenbanken abgebildet werden -- aber auch auf einfache
ASCII- oder DBM-Dateien.
|
Copyright © 1996, 1998, 1999, 2000 Andreas Borchert, in HTML konvertiert am 07.02.2000 |