[Perl]请问一个正则表达式的有关问题
[Perl]请教一个正则表达式的问题。
以下2条文本行，我希望提取出：
1:ifeq ($(findstring _N_64,$(strip $(NOR_FLASH_MEMORY_SIZE_TYPE))),_N_64)
$1=_N_64
$2=NOR_FLASH_MEMORY_SIZE_TYPE
$3=_N_64
2:ifeq($(strip$(J2ME_SUPPORT)),IJET)
$1=J2ME_SUPPORT
$2=IJET
试了很多次都没成功，主要是在 $ ( )等关键字符的处理上不知道怎么匹配，导致失败。
请高手指点一下，谢谢。
------解决方案--------------------
这是我写的：
1. /findstring (\w+).*\((\w+).*,(\w+)\)/
2. /.*\((\w+).*,(\w+)\)/
结果正确：
$1: _N_64
$2: NOR_FLASH_MEMORY_SIZE_TYPE
$3: _N_64
$1: J2ME_SUPPORT
$2: IJET
以下2条文本行，我希望提取出：
1:ifeq ($(findstring _N_64,$(strip $(NOR_FLASH_MEMORY_SIZE_TYPE))),_N_64)
$1=_N_64
$2=NOR_FLASH_MEMORY_SIZE_TYPE
$3=_N_64
2:ifeq($(strip$(J2ME_SUPPORT)),IJET)
$1=J2ME_SUPPORT
$2=IJET
试了很多次都没成功，主要是在 $ ( )等关键字符的处理上不知道怎么匹配，导致失败。
请高手指点一下，谢谢。
------解决方案--------------------
这是我写的：
1. /findstring (\w+).*\((\w+).*,(\w+)\)/
2. /.*\((\w+).*,(\w+)\)/
结果正确：
$1: _N_64
$2: NOR_FLASH_MEMORY_SIZE_TYPE
$3: _N_64
$1: J2ME_SUPPORT
$2: IJET