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

看板Perl作者 (:3)時間16年前 (2009/04/24 22:19), 編輯推噓0(000)
留言0則, 0人參與, 最新討論串2/5 (看更多)
I cannot make sure WHAT you need because you do not write a correct code! If you have a long array looks like @a=('a','e','t','h','c','d','t','h','h','y','y','d','x','y'); and you want to make finite length arrays @b~@f look loke @b=('a','e','t','h','c'); @c=('e','t','h','c','d'); ... @f=('c','d','t','h','h'); You can write the code such like @b=@a[0 .. 4]; @c=@a[1 .. 5]; ... @f=@a[4 .. 8]; You don't need any loop at all!!! ※ 引述《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; : } : 也就是說我想要新產生的陣列的內容是依序遞增的。 : ex: : @a="aethcdthhyydxyhcxfhfsghsfhgfjlgkfjgiffs..." : @b="aethcdthhy" : @c="ethcdthhyy" : @d="thcdthhyyd" : @e="hcdthhyydx" : @f="cdthhyydxy" : 請問在while裡面(產生:@b~@f)是否可以寫成一個迴圈的型態呢? 感謝<_ _> -- 在達文西過世四個月後,麥哲倫展開了人類歷史上的首次環球航行。 -- ※ 發信站: 批踢踢實業坊(ptt.cc) ◆ From: 155.69.204.53
文章代碼(AID): #19ySfguM (Perl)
文章代碼(AID): #19ySfguM (Perl)