В правой колонке я вижу восемь цифр, а не семь. Я смотрю это неправильно? Поэтому я думаю, что вопрос не совсем в том, на что, как кажется, отвечают предыдущие ответы. Семь цифр на самом деле на следующей строке.
Кроме того, для меня это выглядит как вывод столбцов фиксированной длины, так что если вы знаете количество столбцов, вы можете получить значительную скорость, используя точные числа вместо модификатора *.
Так что, если «x» - это число столбцов между L и 6 цифрами, а «L» - в первом столбце,
$ text = ~ m / L \ s {x} (\ d {6}). * [\ R \ n] \ s \ s {x} (\ d {7}) /
выглядит так, как будто оно должно совпадать. Не уверен, что еще может быть в файле, чтобы иметь дело, но это где-то начать.
$ 1 = первый блок цифр (6), $ 2 = 7 цифр на следующей строке. (используя синтаксис perl, при необходимости измените его для других реализаций)