Or you could use the following macro:
While(!At_EOF) {
if (Search_Block("|d|d/|d|d/|d|d|d|d", CP, EOL_pos, NOERR) == 0) {
Del_Line(1)
} else {
Line(1, ERRBREAK)
}
}
Or, with regular expression that gives slightly more specific match:
While(!At_EOF) {
if (Search_Block("[0-1]?[0-9]/[0-3]?[0-9]/[12][90][0-9][0-9]", CP, EOL_pos, REGEXP+WORD+NOERR) == 0) {
Del_Line(1)
} else {
Line(1, ERRBREAK)
}
}
--
Pauli