[問題] 正規化擷取字串
各位版上先進好，小弟是perl新手，想請教有關於正規化切片字串問題如下:
my $ data='{729, 5, "c/media/movie/0012",{0x00,0x02,0x00,}}';
假設我想使字串變為 {729, {0x00,0x02,0x00}}的話
我使正規化方法是 $data=~(s/(\d+),\s\d+,\s\"/\w+/\w+/\w+/\d+\"/$1/);
這樣寫起來蠻麻煩，而且有時候路徑長短不一，想請問版上大大有更好寫法，像是遇到
(^"xxxxx"$) 就去除雙引號內值(小弟試過蠻多次無法達成><)，謝謝!
--
※ 發信站: 批踢踢實業坊(ptt.cc)
◆ From: 111.241.60.88
推
03/29 21:13, , 1F
03/29 21:13, 1F
→
03/29 21:59, , 2F
03/29 21:59, 2F
推
03/30 04:41, , 3F
03/30 04:41, 3F
→
03/30 04:43, , 4F
03/30 04:43, 4F
→
03/30 09:31, , 5F
03/30 09:31, 5F
→
03/30 13:01, , 6F
03/30 13:01, 6F
Perl 近期熱門文章
PTT數位生活區 即時熱門文章
