如何提取除郵政編碼外的所有郵政編碼？

Question

我想從文本文件中提取除55802之外的所有郵政編碼。

\d\d\d\d\d && ^55802 

我試過使用上面的正則表達式，但它不工作。

我應該改變什麼？

Answer 1

如何

(?!55802)\d{5} 

這應與5位數字（\ d {5}）除文本匹配（55802）（？！55802爲負前瞻）

Answer 2

一般來說，它是最好在外面檢查。

$zip =~ /^\d{5}\z/ && $zip ne '55802' 
    or die("Not a valid zip code\n");