您好，
感謝您的回答，
不好意思我沒有表達清楚
: 0 1
: 0 2
: 0 3
: 0 4
: 1 1
: 0 2
: 2 3
: 1 4
: 0 1
: 1 2
右列的1.2.3.4是資料的代號
左列是取得的資料
而資料中，0出現的次數是我要計算的
以這串資料來說
我想要表示的是
1有3個 其中0有2個
2有3個 其中0有2個
3有2個 其中0有1個
4有2個 其中0有1個
請問這樣要怎麼表示呢?
感謝回答~
※ 引述《clanguage (C語言)》之銘言：
: #!/usr/bin/perl
: #1
: my @strings = split '\n',
: "
: 0 1
: 0 2
: 0 3
: 0 4
: 1 1
: 0 2
: 2 3
: 1 4
: 0 1
: 1 2
: ";
: #2
: foreach (@strings) {
: $data->{ $2 } += int($1) if /(\d+)\s*(\d+)\s*/;
: }
: #3
: print "Number: $_, Times: $data->{ $_ } \n"
: for sort keys %{ $data };
: 程式輸出:
: Number: 1, Times: 1
: Number: 2, Times: 1
: Number: 3, Times: 2
: Number: 4, Times: 1