私はいくつかの30のAIXサーバーをしていますが、それらのソフトウェアパッケージの整合するようにします。 AIXのソフトウェアパッケージには、コロン別のリスト内のすべての適切な情報を一覧するためのコマンドを提供しています-私のssh経由で収集し、この一時ディレクトリserver_name.logでつかむ。

今、私はこだわっている。私はどうすれば、各サーバーのリストを参照するかどうかは、ソフトウェアがインストールされてトラバースを行うすべてのユニークなパッケージのリストを作成することができますか？

以下の例を説明する私のdilema役立ちます。



ファイル1

awkは： 1.1
セッド： 3.2
のssh ： 4.1.2

ファイル2
何か： 1.0.1
awkは： 1.1
セッド： 3.2

ファイル3

何か： 1.0.1
awkは： 1.1
bgp ： 1.0
セッド： 3.2

どのようなソフトウェアをインストールする必要があるのマスターリストをお持ちですか？

使用する必要があります Perlの またはAwkの配列に（ Perhハッシュ）を印刷して、最後のパッケージ（配列のキー）と間違ってのバージョン（キー値）欠けているのバージョンを読むこと。

＃私はServer1にlslpp -液晶> /作成するtmp/lslpp_files/server1.log sshを使用する
＃は、ログファイルです。私のファイルを整理して、ユニークなすべてのログの猫でした
＃猫を/ tmp / lslpp_files / *ログ|カット- Dの" ： " - F1を|ソート- ū

＃ ！ / usr / binに/perlの
@ホスト\u003d （ Server1に、 server2の、 server3 ） ;

ドルのホストのホスト（ ） @ （
オープン（ MYINPUTFILE 、 " < / tmpを/ lslpp_files / $ host.log " ） ;
私の（ライン） \u003d <MYINPUTFILE> @ ;
線（ライン） @ $ foreachの
（
ムシャムシャ食う;
次の場合/^#/;
（ $パッケージ名、 $ファイル、 $レベル、 $州、 $ PTFId 、 $ FixState 、 $タイプ、 $説明、 $ DestinationDir 、 $アンインストーラ、 $ MessageCatalog 、 $ MessageSet 、 $ MessageNumber 、 $親、 $自動EFIXLocked $ 、 $ InstallPath 、 $ BuildDate ） \u003d分割（ / ： / 、 $ライン） ;

＃印刷" $ホスト- $ファイル- $レベル\ Ñ " ;
$ HoH （ $ホスト） （ $ファイル） \u003d $レベル;
）
近い（ MYINPUTFILE ） ;
）
＃
ファイルの比較＃
＃
オープン（ COMPFILE 、 " < / tmpを/ lslpp_files.final " ） ;
私のcomplines （ ） \u003d <COMPFILE> @ ;

＃
＃印刷ヘッダー
＃
印刷する"ファイル： Server1に： server2の： server3 \ Ñ " ;
complines （ ） @ compline $ foreachの
（
（ $ Filset 、 $ Lvl ） \u003d分割（ / ： / 、 $ compline ） ;
印刷" $ Filset " ;
ドルのホストのホスト（ ） @ （
印刷" ： $ HoH （ $ホスト） （ $ Filset ） " ;
）
" \ Ñ "印刷;
）
近い（ COMPFILE ） ;