正則表達式匹配perl

Question

我正在嘗試將字符串的一部分與是或否答案進行匹配。 字符串可以是： '{"valid_js":"yes"...'或'{"valid_js":"no"...' 。 我正在嘗試獲得“是”或“否”

我可以使用類似以下的內容：

/:."yes"/g

還是我需要更復雜的東西？

Answer 1

試試這樣的東西...

if (m/"valid_js":"(yes|no)"/)
{
    # At this point $1 will contain either yes or no
    if ($1 eq 'yes')
    {
      # Answer is yes
    }
    else
    {
      # Answer is no
    }
}

Answer 2

這是regexp的通用形式：

valid_js["]:["](yes|no)["] -> $1

您可以使用該正則表達式進行匹配或替換。

Answer 3

這應該可以幫助您：

$input = '{"valid_js":"yes"...';

if (($input =~ m/"valid_js":"(.*?)"/) && ($1 eq 'yes')) {
  print "1: yes\n";
}

$input = '{"valid_js":"no"...';

if (($input =~ m/"valid_js":"(.*?)"/) && ($1 eq 'yes')) {
  print "2: yes\n";
}

您可以在此處測試代碼。