Hallo zusammen,
ich bin noch blutiger PERL-Anfänger und muss ein Perl-Programm basteln, mit dem man Kommandozeilenbefehle absetzen kann um dann Teile der Ausgabe weiterverwenden zu können.Hier mal die Abfolge der Kommandos:
rsm view /tmedia_pool /guiddisplay
rsm view /tmedia_pool /cg<b>A15F28279EDB4B3DA0B4105C710FA59E</b> /guiddisplay
rsm view /tphysical_media /cg<b>FE31CA92DD38449FAD5657541CCA6EC0</b> /guiddisplay
rsm freemedia /pg<b>4D718DA244DA4044A6AE7EA04E01B725</b>
Die Angaben, die Fett geschrieben sind, sind die Teile, die ich übernehmen muss um sie dann bei der nächsten Eingabe weiterzuverwenden.
Hier das Ganze mal im Detail:
<i>
C:\WINDOWS\system32>rsm view /tmedia_pool /guiddisplay
MEDIA_POOL
Freie Medien 622300E68FB14120839476AA95B79EA1
Importmedien 5EAAD7DA09E942D6938457F261E764F0
Nicht erkannte Medien 8900558884294E15A63BA6F2871402C9
Tivoli Storage Manager 0FCC844F100B4DC1AF6A5EB21C472599
Der Befehl wurde ausgeführt.
C:\WINDOWS\system32></i>
Davon muss ich jetzt den Teil hinter Importmedien übernehmen, also lautet dann die nächste Eingabe:
<i>
C:\WINDOWS\system32>rsm view /tmedia_pool /cg5EAAD7DA09E942D6938457F261E764F0 /guiddisplay
MEDIA_POOL
DLT 983C2588E3C5473DBE22D595997E19A1
Der Befehl wurde ausgeführt.
C:\WINDOWS\system32></i>
Dann brauch ich eben die Ausagbe hinter DLT wieder, und so weiter und so weiter.
Wie kann ich denn das Ganze am Besten realisieren?
VIELEN DANK für Eure Hilfe bereits im Voraus.
MfG
Thomas
Datum: 08.12.2004-07:56
