各位版大好,
有笔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]