質問編集履歴
1
二つ目のループ内の$j=$a[0]を$b[0]に修正しました。
test
CHANGED
File without changes
|
test
CHANGED
@@ -1,5 +1,9 @@
|
|
1
1
|
質問の内容
|
2
2
|
ファイル2の文字列がファイル1の2列目の文字列と部分一致している場合、数をカウントし出力する方法について質問です。
|
3
|
+
|
4
|
+
resultの3個目の3個目の値は値は1つ目、2つ目の文字列が入っているのをが入っているのを除外したいので除外したいので求めたい求めたい値は値は4です。
|
5
|
+
|
6
|
+
result
|
3
7
|
```fail1
|
4
8
|
111 AAA_BBB_CCC_DDD_1
|
5
9
|
222 AAA_BBB_CCC_DDD_2
|
@@ -9,7 +13,7 @@
|
|
9
13
|
666 AAA_BBB_1
|
10
14
|
777 AAA_BBB_2
|
11
15
|
888 AAA_BBB_3
|
12
|
-
999 AAA_BBB_4
|
16
|
+
999 AAA_BBB_4
|
13
17
|
```
|
14
18
|
```fail2
|
15
19
|
AAA_BBB_CCC_DDD
|
@@ -39,7 +43,7 @@
|
|
39
43
|
while(<INF2>){
|
40
44
|
chomp;
|
41
45
|
@b=split;
|
42
|
-
$j = $
|
46
|
+
$j = $b[0];
|
43
47
|
if ($i =~ $j) {
|
44
48
|
$keyword{$j}++;
|
45
49
|
}
|
@@ -50,4 +54,4 @@
|
|
50
54
|
```
|
51
55
|
試したこと
|
52
56
|
多重ループを組み、正規表現で部分一致させながら集計したが、ファイルの量が膨大なため多重ループを組まない方法を模索中
|
53
|
-
ループが終了後の変数の保持がうま
|
57
|
+
ループが終了後の変数の保持がうまない
|