if ($data[$i] =~ m/^(?:81|82)$/ && $data[$i] eq $data[$i+1]) {