Perlを使用して2つのファイルから同じRecordのみ抽出する方法に
Perlを使用して2つのファイルから同じRecordのみ抽出する方法について
はじめまして。
Perlを使用してフィイル1にあるレコードのみファイル2から抽出したいのですがhashを使用して実施してもうまく取り出せないため、何か方法やアドバイスが頂ければと思います。
なお、ファイル2にあるカラムで必要な部分はr1とr8のみですのでその部分のみ抽出し別のファイル(dファイル3)に出力できればと思います。
宜しくお願い致します。
■ファイル1(カラム1つ)
r1
5aa00000000
5aa00000001
5aa00000002
5aa00000003
・
・
・
約50,000行
■ファイル2(カラム9つ)
r1 ,r2,r3,r4,r5,r6,r7,r8 ,r9
5aa00000000,00,00,00,00,00,00,XXa,00
5aa00000001,00,00,00,00,00,00,XXb,00
5aa00000002,00,00,00,00,00,00,XXc,00
5aa00000003,00,00,00,00,00,00,XXb,00
・
・
・
約200,000行
■ファイル3(カラム2つ)
r1 ,r2
5aa00000000,XXa
5aa00000001,XXb
5aa00000002,XXc
5aa00000003,XXb
・
・
・
約50,000行