[請益] 如何寫出倒著累加的script?
想請教版友，如何寫出由後往前累加的script?
資料型態長這個樣子：
GY*20 49 74
DS*21 38 63
TE*24 23 28
FF*25 11 21
GT*26 12 14
^^
要將這個數直從後往前累加...
在這個例子裡面希望得到：
133
84
46
23
12
(左邊的數字(*後面的)可能不連續)
不知道有沒有辦法辦到..
要處理的資料量很大，現在用計算機按ing...Orz
~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
PS.有想過有要hash試試
my %f;
while ( <DATA> ) {
my ($k,$w,$v) = m/\w\w\*(\d+)\s(\d+)\s(\d+)/;
$f{ $k } ||=0, $f{ $k }+=$w;
}
這樣%f就是含有數值的hash，不過接下來不知道該怎麼從後面加回來
可能不是個好方法>"<
--
37m﹡
--
※ 發信站: 批踢踢實業坊(ptt.cc)
◆ From: 218.174.36.214
→
05/24 11:30, , 1F
05/24 11:30, 1F
→
05/24 11:31, , 2F
05/24 11:31, 2F
→
05/24 13:26, , 3F
05/24 13:26, 3F
→
05/24 13:26, , 4F
05/24 13:26, 4F
推
05/24 17:55, , 5F
05/24 17:55, 5F
推
05/24 17:56, , 6F
05/24 17:56, 6F
推
05/24 18:07, , 7F
05/24 18:07, 7F
→
05/24 18:08, , 8F
05/24 18:08, 8F
→
05/24 19:23, , 9F
05/24 19:23, 9F
→
05/24 19:24, , 10F
05/24 19:24, 10F
→
05/24 19:25, , 11F
05/24 19:25, 11F
→
05/25 15:25, , 12F
05/25 15:25, 12F
討論串 (同標題文章)
以下文章回應了本文 (最舊先)：
完整討論串 (本文為第 1 之 3 篇)：
Perl 近期熱門文章
PTT數位生活區 即時熱門文章
