Opened by choff at 2011-10-05 18:14
User since
2011-10-05
12 Artikel
BenutzerIn
![[default_avatar]](/battie/theme/default/default_avatar.gif)
2011-10-05
12 Artikel
BenutzerIn
Hallo,
ich habe wenig Ahnung von Perl, möchte aber gern ein kleines Skript schreiben.
Und zwar habe ich zwei Skalare mit bestimmten Informationen.
Nun sollen die beiden gemergt werden. Beide Skalare enthalten die ElementID, eine hexadezimale Zeichenfolge. Jetzt möchte ich gern, dass im Skalar 2 der ElementName zur zugehörigen ElementID zugeordnet wird. Der ElementName ist nur in Skalar 1 verfügbar. Also kurz gesagt, soll dann ein neues Skalar entstehen, welches die Informationen aus Skalar2 enthält zuzüglich des ElementNamens, der nur in Skalar1 zu sehen ist.
Wie stelle ich das jetzt am besten an? Mit Regex?
Ausgabe:
Skript:
Last edited: 2011-10-05 18:29:15 +0200 (CEST)
ich habe wenig Ahnung von Perl, möchte aber gern ein kleines Skript schreiben.
Und zwar habe ich zwei Skalare mit bestimmten Informationen.
Nun sollen die beiden gemergt werden. Beide Skalare enthalten die ElementID, eine hexadezimale Zeichenfolge. Jetzt möchte ich gern, dass im Skalar 2 der ElementName zur zugehörigen ElementID zugeordnet wird. Der ElementName ist nur in Skalar 1 verfügbar. Also kurz gesagt, soll dann ein neues Skalar entstehen, welches die Informationen aus Skalar2 enthält zuzüglich des ElementNamens, der nur in Skalar1 zu sehen ist.
Wie stelle ich das jetzt am besten an? Mit Regex?
Ausgabe:
Code: (dl
)
1
2
3
4
5
CreationClassName|ElementName|ElementID|OnTimeInMilliseconds
Msvm_ComputerSystem|DevManage|0454C4E6-2C92-41C1-A5FD-D9F145D798D4|1051510957
CreationClassName|DeviceID|LoadPercentage|SystemCreationClassName|ElementID
Msvm_Processor|Microsoft:b637f346-6a0e-4dec-af52-bd70cb80a21d\0|0|Msvm_ComputerSystem|0454C4E6-2C92-41C1-A5FD-D9F145D798D4
Skript:
Code: (dl
)
1
2
3
4
5
6
7
8
#!/usr/bin/perl -w
use strict;
my ($skalar1, $skalar2);
$skalar1 = "wird gefüllt durch spezielle Abfrage";
$skalar2 = "wird gefüllt durch spezielle Abfrage";
print "$skalar1\n\n$skalar2\n";
Last edited: 2011-10-05 18:29:15 +0200 (CEST)