Sie sind vermutlich noch nicht im Forum angemeldet - Klicken Sie hier um sich kostenlos anzumelden Impressum 
  Forum Übersicht   Suche    Anmelden    Login   Online ?   Mitglieder   FAQ
Sie können sich hier anmelden
Dieses Thema hat 2 Antworten
und wurde 407 mal aufgerufen
Bei Antworten informieren
 Diskussion zu Abfragen
rsinnig Offline



Beiträge: 5

24.02.2011 19:08
Zugriff auf PICDB mit Perl und dem DBD::DB2 Modul Antworten

Hallo,

ich habe zwei Perl Skripte zum Auflösen und Erstellen von Bildgruppen geschrieben.

GruppenAufloesenNachDatum.pl
--> löst alle Bildgruppen auf, die mindestens ein Bild enthalten, dessen Aufnahmedatum in die konfigurierte Zeitspanne fällt.
GruppierenDateiMuster.pl
--> gruppiert Bilder mit gleichen Dateinamen-Muster (Teilzeichenkette) innerhalb der Zeitspanne. Gruppenbild wird wie üblich das zuerst eingefügte Bild.
Bsp.:
20101229_171024_DSC_5120.nef
20101229_171024_DSC_5120_dxo.jpg
20101229_171024_DSC_5121.nef
20101229_171024_DSC_5121_dxo.jpg
--> Teilstring(1,24) = 20101229_171024_DSC_5120 & 20101229_171024_DSC_5121 --> es werden zwei Gruppen erstellt.
Die eingebaute Autogruppierungsfunktion würde hier eine Gruppe aus 4 Bilder erstellen, da diese über die Zeit gesteuert wird.

Die vorkompilierten Perl-Module sind für ActiveState Perl ab Version 5.10 erstellt.

Bitte immer vorher ein Backup machen! Eine Rückgängig-Funktion der Datenbankmanipulation ist nicht eingebaut!

Ich hoffe, der Eine oder Andere kann es gut brauchen

Grüße Rico

Dateianlage:
DBD_DB2_v1.80.zip
Perl_BildGruppen.zip
Peter Offline



Beiträge: 855

24.02.2011 20:26
#2 RE: Zugriff auf PICDB mit Perl und dem DBD::DB2 Modul Antworten

Hallo Rico,

Vielen Dank, für den Beitrag! Ich denke dass einige diese Funktion verwenden werden!

Gruß
Peter

rsinnig Offline



Beiträge: 5

23.02.2012 17:47
#3 Nachtrag zum vorkompilierten Perl-Modul Antworten

Das vorkompilierte Perl-Modul DBD_DB2_v1.80 ist nicht mit Perl 5.014 kompatibel.

Für Perl 5.014 muss DBD:DB2 v1.82 verwendet werden. Die hier angehängte Datei enthält eine vorkompilierte Version für ActivePerl v5.014 64bit.

Dateianlage:
DBD_DB2_v1.82_X64.zip
 Sprung