[請益] 在一行code中split兩次

[josefy (醉落~最弱)]

各位版大好,

有筆data 我希望用條件A split第一次並取出split後元素 1,3,5

之後再用條件B split第二次, 這時我需要取第1個元素並把資料存到 @rawdata裡面

我已經可以分兩次做完 但是我想以perl的強大功能, 應該可以更簡潔.

是否有辦法用一行就把這"兩"個動作完成 ?

感謝

--
※ 發信站: 批踢踢實業坊(ptt.cc), 來自: 220.135.242.247
※ 文章網址: http://www.ptt.cc/bbs/Perl/M.1417444813.A.093.html
→ flu: 不先提供sample code嗎？
推 skenbo0916: $s = '1,2_3,4_5,6_7';
→ skenbo0916: split /_/, (join '', split /,/, $s);
→ skenbo0916: 是這樣嗎？
→ CindyLinz: 對啊~~ 原po先給你的版本幫助大家理解嘛 ^^ (敲碗)
→ AntaresStar: 以樓上的範例  我猜應該是
→ AntaresStar: map{[split /_/]->[0]}@{[split /,/,$s]}[0,2,4]