��専門家ら��

���を助���������列�概念を�常�明確������よ��1��テキストファイル��り��。
1 |アメリカ|をhh
2 |アメリカ| ll
3 |アメリカ|英領�ージン諸島
4 |イギリス| nn�
5 |イギリス| bb
6 |クウェート|ミリ
6 |クウェート| jkj
7 |ド�イ|をhh

��3番目�テキスト��彼��列��ファイル�後����よ�������レ�ートを�存�る必���り��fied

3番目�フィールド数
アメリカ3
イギリス2
クウェート2
ド�イ1
��中�3番目�フィールド��列�格��る必���り��appeared.the �任�������3番目�フィールド�数回�調査���英数字を与�る�������。
���連絡����体��列を使用���れを行�方法を教��������。

よ����
Shary

�れを試������：

�も�����Awk�スクリプトを探������何��よ��
列�グループをクリック��カウント�����。

��� Awk����るグループ��る：

awk�- F�� ' （和[ $ 1 � $ 2 � $ 3 ] + \u003d $ 4 ）エンド�刷�和[�] ）�データ（ （���計�） 。

�り���
SUmeet

親愛�るサミット�

�れ�������感���回答�������り��������
�������説明�る�������������
（和[ $ 1 � $ 2 � $ 3 ] + \u003d $ 4 ）
何������列��列をコンセプト�弱�れ��る��を��他�3分野��を格��る�������ケース���1,2,3 fileds格��れる場�����よ���味を��。
��テキスト���データ���り�����コマンド��れを簡���る�������������ファイル�1000行�も�れ��
awk�- F�� ' （和[ $ 1 � $ 2 � $ 3 ] + \u003d $ 4 ）エンド�刷�和[�] ）�データ（ （���計�） 。

よ����
Shary

1�� perl� ソリューション：

$ cat data
1|usa|hh
2|usa|ll
3|usa|vg
4|uk|nn
5|uk|bb
6|kuwait|mm
6|kuwait|jkj
7|dubai|hh
$
$
$ cat mm.pl
#! /usr/local/bin/perl

open(DATA, "< data") || die "Unable to open file other\n";
while (<DATA>) {
        chomp;
        @fields = split(/\|/);
        $counts{$fields[1]}++;
}
close(DATA);

foreach $word (sort keys %counts) {
        print "value = ", $word, "  count = ",  $counts{$word}, "\n";
}
exit 0
$
$
$
$ ./mm.pl
value = dubai  count = 1
value = kuwait  count = 2
value = uk  count = 2
value = usa  count = 3
$

��専門家ら��

�dont��スクリプト��る perl�。
以外�場�����能性を試������。 perl� （�列を使用 perl�） 。

よ����

Shary

����サンプル出力���り�必��2番目�フィールド��第3�1�������数：

awk -F"|" '{ freq[$2]++ } END {
for (word in freq)
printf "%s\t%d\n", word, freq[word]
}' data