Schlüsselbegriffe aus Textdatei auslesen
07.05.2013 10:46:04
Johannes
ich möchte aus einer Gantt project-Datei Elemente auslesen.
Gantt project ist ein Freeware MS project und speichert in
einem xml-Format ab, d.h. in Klartext mit Elementen, die wie
folgt aussehen:
(task id="83" name="Technical Specification is agreed"
color="#8cb6ce" meeting="true" start="2013-01-14"
duration="0" complete="0" expand="true")
(notes)(![CDATA[[myKEYWORD]]])(/notes)
(depend id="19" type="2" difference="0" hardness="Strong"/)
(/task)
Für solche tasks, die "myKEYWORD" enthalten (meine Schlüssel-
Meilensteine), möchte ich den Namen und das Datum auslesen und
in einer Liste ausgeben. Die Anzahl solcher tasks soll offen
sein.
In perl sähe das in etwa so aus (erst Name und Datum jeder Task
merken, dann, bei pattern-match ausgeben):
open(my $in, ") { # assigns each line in turn to $_
if ((/duration=\"0\"/)&&(/name=\"([^"]+)\".+start=\"([^"]+)\"/)) {
$task=$1;
$start=$2;
}
if (/\[\[(myKEYWORD)\]\]/) {
$i+=1;
print "$1 $i ($start): $task\n";
}
}
Danke,
Johannes