Re: [請益] 如何寫出倒著累加的script?

看板Perl作者 (pziyout)時間16年前 (2009/05/25 12:43), 編輯推噓0(001)
留言1則, 1人參與, 最新討論串3/3 (看更多)
※ 引述《adu (^_^)》之銘言: : 想請教版友,如何寫出由後往前累加的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 : (左邊的數字(*後面的)可能不連續) 若 @a = (49,38,23,11,12) ; 則 @b = reverse map($s+=$_,reverse @a) ; 印出 @b 即可。 -- ※ 發信站: 批踢踢實業坊(ptt.cc) ◆ From: 140.115.25.24

05/25 15:26, , 1F
推! 感謝各位版大m(__ __)m
05/25 15:26, 1F
文章代碼(AID): #1A6Y8AVE (Perl)
文章代碼(AID): #1A6Y8AVE (Perl)