Datum aus Changelog-Textdatei auslesen

[Gast] Foren Archiv Perl und CGI Datum aus Changelog-Textdatei auslesen

Archiv - Archivierte Foren

Themen

Beiträge

Moderatoren

Letzter Beitrag

Perl und CGI

359

1951

11. Apr 2024, 18:43

shalena54

Meshuggah

Beiträge gesamt: 3

28. Jan 2008, 09:13
Beitrag # 1 von 5
Bewertung:
(25416 mal gelesen)
URL zum Beitrag
Beitrag als Lesezeichen

Hallo zusammen,
ich hab da ein kleines oder größeres Problem:

Ich habe ein Skript, welches eine Tabelle mit drei Spalten generiert. In der ersten Spalte sollen Programme und in der zweiten die dazugehörigen Erstellungsdaten angezeigt werden. Die dritte Spalte ist für das Problem nicht relevant. Diese Erstellungsdaten sind der changelog.txt zu entnehmen, welche ungefähr so aussieht:

-----------------------------------------------
CHANGELOG FÜR PROGRAMM 1
-----------------------------------------------

Version Datum Änderungen

------- ---------- ---------------

P1_Version_1 18.01.2008 - erstversion

P1_Version_2 19.01.2008 - dies und das
- so einiges
- außerdem das

Soll heißen, wenn in der ersten Spalte als Programm P1_Version_1 steht, soll als Datum der Version der 18.01.2008 ausgegeben werden. Ich habe es zuerst mit der stat-Funktion probiert, aber die gibt ja nur die Sekunden seit dem 1.1.1970 an und das ist etwas ungünstig. Die Textdatei müsste ja mit open auslesbar sein, aber die Einbindung in den Code passt wohl noch nicht so ganz...

Relevanter Ausschnitt des Codes:

Code:

Code

} 
 
foreach (sort(@VZ)) { 
 
	if ( !($_ =~ /^\.{1,2}$/) ) { 
		printf("<tr>"); 
		if ( -d $hz.$_ ) { 
			opendir(P_DIR, $hz.$_); # || die "$Verzeichnis: $!"; 
			my @p_dir = readdir(P_DIR); 
			closedir(P_DIR); 
			printf("<td><b>%s</b></td>\n", $_); 
			printf("<td></td>\n", (stat($hz.$_))[9] ); 
			printf("<td>"); 
			print_file($hz,$hz.$_."/programmbeschreibung.txt"); 
			printf("</td>"); 
			foreach $p_dir (sort(<@p_dir>)) { 
				if ( !($p_dir =~ /^\.{1,2}$/) && -d $hz.$_."/".$p_dir) { 
					print("<tr>"); 
					printf("<td><a href='$pfad$p_dir'>%s</a></td>\n", $p_dir); 
					printf("<td>%s</td>\n"); 
					printf("<td>%s</td>\n"); # #hier soll das Datum eingetragen werden! 					print("</tr>"); 
				} 
			} 
			 
		} 
		printf("</tr>"); 
	} 
}

Kann da freundlicherweise jemand helfen? Werden noch mehr Angaben / Erklärungen gebraucht?

mfg
D.

Datum aus Changelog-Textdatei auslesen

oesi50

Beiträge gesamt: 2315

28. Jan 2008, 10:37
Beitrag # 2 von 5
Beitrag ID: #333579
Bewertung:
(25388 mal gelesen)
URL zum Beitrag
Beitrag als Lesezeichen

hallo Meshuggah

das Ergebnis von stat kannst du so auswerten:

Code

my ($sec,$min,$hour,$mday,$mon,$year,$wday,$yday,$isdst) = localtime($unixtime); 
$mon +=1; 
$year +=1900;

die Versionszeile kannst du einfach mit split auseinandernehmen

Code

$versionszeile = 'P1_Version_2 19.01.2008 - dies und das'; 
 
my ($version_text, $version_datum, undef) = split(/\s/, $versionszeile, 3); 
 
print "---$version_text---$version_datum---";

als Antwort auf: [#333556]

Datum aus Changelog-Textdatei auslesen

Meshuggah

Beiträge gesamt: 3

28. Jan 2008, 12:20
Beitrag # 3 von 5
Beitrag ID: #333606
Bewertung:
(25380 mal gelesen)
URL zum Beitrag
Beitrag als Lesezeichen

Hallo oesi50,

zuerst herzlichen Dank für deinen Beitrag!

Ich habe es mit dem stat-Befehl versucht und den wie folgt in meinem Skript eingebaut:

Code

 
my @info = stat($hz.$_."/".$p_dir); 
my @date = localtime($info[9]); 
my $datum = ("%02d.%02d.%04d", $date[3], $date[4]+1,$date[5]+1900); 
printf("<td>$datum</td>\n");

Allerdings wird das Datum anstatt im Format DD.MM.YYYY nur in YYYY (hier: 2008) ausgegeben. Ich kann mir das gerade nicht erklären. Hast du da einen Tipp?

edit:

Nun funktioniert die Ausgabe. Allerdings wird immer das gleiche Datum ausgegeben, vermutlich ist bei der Schleife dann was falsch...

als Antwort auf: [#333579]
(Dieser Beitrag wurde von Meshuggah am 28. Jan 2008, 12:38 geändert)

Datum aus Changelog-Textdatei auslesen

Meshuggah

Beiträge gesamt: 3

28. Jan 2008, 13:01
Beitrag # 4 von 5
Beitrag ID: #333614
Bewertung:
(25372 mal gelesen)
URL zum Beitrag
Beitrag als Lesezeichen

Hm..ich kann gerade nicht bearbeiten, aber das genannte Problem hat sich glaub ich erstmal gelöst.

Herzlichen Dank für die Hilfe!

als Antwort auf: [#333606]

Datum aus Changelog-Textdatei auslesen

oesi50

Beiträge gesamt: 2315

28. Jan 2008, 13:02
Beitrag # 5 von 5
Beitrag ID: #333615
Bewertung:
(25370 mal gelesen)
URL zum Beitrag
Beitrag als Lesezeichen

Zitat Allerdings wird immer das gleiche Datum ausgegeben

Das kann schon sein. Wenn eine Datei geändert wird, heist das nicht zwingend, dass auch der dazugehörige Verzeichniseintrag geändert wird. Du musst also die Modifikationszeit der Datei und nicht des Verzeichnisses abfragen.

als Antwort auf: [#333606]

Aktuell

PDF / Print

MadeToTag mit neuer Vorgaben-Funktion und umfangreichen Verbesserungen

| 04.04.2024

Veranstaltungskalender

Hier können Sie Ihre Anlässe eintragen, welche einen Zusammenhang mit den Angeboten von HilfDirSelbst.ch wie z.B. Adobe InDesign, Photoshop, Illustrator, PDF, Pitstop, Affinity, Marketing, SEO, Büro- und Rechtsthemen etc. haben. Die Einträge werden moderiert freigeschaltet. Dies wird werktags üblicherweise innert 24 Stunden erfolgen.

Hier eine kleine Anleitung hinsichtlich Bedeutung der auszufüllenden Formularfelder.

Veranstaltungen

14.05.2024

Einsparpotenziale in der Weiterverarbeitung

Online
Dienstag, 14. Mai 2024, 10.00 - 10.30 Uhr

Webinar

Prozessoptimierung ist ein Teamsport! Keine Software und keine Maschine allein kann Ihnen helfen, die Effizienzpotenziale Ihres Betriebes maximal auszuschöpfen. Von der Auftragsannahme über die Vorstufe und den Druck bis hin zur Weiterverarbeitung – alles muss optimal ineinandergreifen. Apropos Weiterverarbeitung – in vielen Druckbetrieben fristet sie in Sachen Prozessoptimierung immer noch ein Schattendasein. Dabei liegen hier mittlerweile die größten Einsparpotenziale! In einem Webinar von Horizon und Impressed erfahren Sie, wie Sie diese Einsparungen realisieren können. Horizon, bekannt für innovative Lösungen in der Druckweiterverarbeitung, bietet mit iCE LiNK eine Workflowlösung für die Weiterverarbeitung. iCE LiNK überwacht, visualisiert und analysiert Produktionsabläufe und unterstützt bei der Wartung – damit immer alles reibungslos läuft. Den gleichen Anspruch hat der von Impressed entwickelte Impressed Workflow Server – er ist die smarte PDF-Workflow-Lösung für Druckereien, die Datenmanagement, Preflight und Produktionssteuerung übernimmt. Im Webinar zeigen Ihnen die Experten von Horizon und Impressed, wie beide Lösungen im Team die Effizienz und Produktivität Ihres Betriebes steigern können. Melden Sie sich am besten gleich an, wir freuen uns auf Sie! PS: Melden Sie sich in jedem Fall an – sollten Sie zum Termin verhindert sein, erhalten Sie die Aufzeichnung.

kostenlos

Organisator: Impressed / Horizon

https://www.impressed.de/schulung.php?c=sDetail&sid=327

Einsparpotenziale in der Weiterverarbeitung

Veranstaltungen

16.05.2024

Und es geht doch: Automatisierung im Großformatdruck!

Online
Donnerstag, 16. Mai 2024, 10.00 - 10.30 Uhr

Webinar

Komplizierte, kleinteilige Aufträge; alles sehr speziell; seit Jahren bewährte Prozesse – da können wir nichts standardisieren und automatisieren! Das sagen viele Großformatdrucker – aber stimmt das wirklich, ist dem tatsächlich so? Günther Business Solutions und Impressed treten in einem Webinar den Gegenbeweis an. Experten beider Unternehmen zeigen, wie Großformatdrucker vom Einsatz zweier bewährter Lösungen profitieren können: • von advanter print+sign von Günther Business Solutions, dem ERP-System für den Großformatdruck, dass alle Phasen der Wertschöpfung im Large Format Printing abdeckt • von Impressed Workflow Server, der smarten PDF-Workflow-Lösung für Druckereien, die Datenmanagement, Preflight und Produktionssteuerung übernimmt Über die Kombination beider Lösungen können Großformatdrucker ihre Prozesse mit modernen Workflows Schritt für Schritt automatisieren – und so zügig deutliche Zeit- und Kosteneinsparungen realisieren. Das Webinar sollten Sie sich nicht entgehen lassen – damit Sie keine Effizienzpotenziale mehr liegen lassen. Melden Sie sich am besten gleich an, wir freuen uns auf Sie! PS: Melden Sie sich in jedem Fall an – sollten Sie zum Termin verhindert sein, erhalten Sie die Aufzeichnung.

kostenlos

Nein

Organisator: Impressed / Günther Business Solutions

https://www.impressed.de/schulung.php?c=sDetail&sid=326

Und es geht doch: Automatisierung im Großformatdruck!

Weitere Events

Neuste Foreneinträge

Switch/PitStop: Sprachdatei vom Report ändern

Mit Preflight Registerfarbe ALL nach Grau konvertieren geht nicht

Absatzsetzer in CC24 ME lösen Probleme aus

Quark Objekte lassen sich nicht neben Layout ziehen.

Barrierefreie PDFs | Mögliche unangebrachte Verwendung des Strukturelements xy

Barrierefreiheit in indesign 2022: figure-Tags haben als Attributobjekt "block" statt "inline"?

Kontrollkästchen in PDF-Formular

Indesign Tabelle ausrichten

Mehrfach geschichtete und übereinander gelagerte PDFs bereinigen

InDesign 19.2 konvertiert 19.3-Dateien beim Öffnen ungefragt

Weitere Stellenangebote