Re: [問題] 這幾行程式能寫乘一個迴圈嗎?

看板Perl作者 (c9s)時間16年前 (2009/04/25 02:02), 編輯推噓1(100)
留言1則, 1人參與, 最新討論串5/5 (看更多)
※ 引述《bxorw (每天保持微笑)》之銘言: : 我有一個原始的@a,長度500 : 我想要產生5個不同的陣列,而其內容值為@a內容1~50 : 我的寫法... : $count=0; : while ($count < 10){ : @b=@a[$count-9...$count]; : @c=@a[$count-8...$count+1]; : @d=@a[$count-7...$count+2]; : @e=@a[$count-6...$count+3]; : @f=@a[$count-5...$count+4]; : $count+=1; : } (笑) 不要忘記你現在是寫 perl , not c code. :) 不需要這麼辛苦去 $count 呀 for ( 0 .. 10 ) { ... } 另外若是要做 list 的抽取,你也可參考 splice function perldoc -f splice -- -- ※ 發信站: 批踢踢實業坊(ptt.cc) ◆ From: 122.117.168.163

04/25 02:04, , 1F
感謝你的提醒...因為我剛接觸perl不久,還有之前的習慣= =/
04/25 02:04, 1F
文章代碼(AID): #19yVx2HD (Perl)
文章代碼(AID): #19yVx2HD (Perl)