各位版大好,
有筆data 我希望用條件A split第一次並取出split後元素 1,3,5
之後再用條件B split第二次, 這時我需要取第1個元素並把資料存到 @rawdata裡面
我已經可以分兩次做完 但是我想以perl的強大功能, 應該可以更簡潔.
是否有辦法用一行就把這"兩"個動作完成 ?
感謝

不先提供sample code嗎？

$s = '1,2_3,4_5,6_7';split /_/, (join '', split /,/, $s);是這樣嗎？

對啊~~ 原po先給你的版本幫助大家理解嘛 ^^ (敲碗)

以樓上的範例 我猜應該是map{[split /_/]->[0]}@{[split /,/,$s]}[0,2,4]