Help for this page
while ( <DATA> ) { print unless m/##(\d+)## \1/; ... REG-NZL-PUB.1981-263 ##1983## 19810922 REG-NZL-PUB.1981-263 ##1984## 19810922 REG-NZL-PUB.1981-263 ##1985## 19850922
REG-NZL-PUB.1981-263 ##1981## 19820922 REG-NZL-PUB.1981-263 ##1981## 19830922 ... REG-NZL-PUB.1981-263 ##1982## 19810922 REG-NZL-PUB.1981-263 ##1983## 19810922 REG-NZL-PUB.1981-263 ##1984## 19810922