print grep / ^ (?: (?:[^,]*,){4},{3}\d,0,\d | (?:[^\t]*\t){4}\t{3}\d\t0\t\d ) /x, ; #### print grep /^(?:[^,\t]*[,\t]){4}[,\t]{3}\d[,\t]0[,\t]\d/, ;