Соединить два awk сценария

[Grih65kop]

Из файла необходимо (при помощи awk) выбрать строки в которых больше 4 символов, а затем обрезать строки длиней 4 символ до 4 символьных.

file

Код: Выделить всё

012345678
12
32146544
123
879484121

Делаю так:
awk 'length > 4' file >file2
awk '{print substr($0,0,5)}' file2

Все работает, но не могу понять как эти два awk сценария можно соединить в один, и почему мы должны указывать 5, а не 4.

[SLEDopit]

Код: Выделить всё

awk 'length>4{print substr($0,0,5)}' file

Код: Выделить всё

sed -n '/[0-9]\{4\}\+/{s/\([0-9]\{4\}\).*/\1/;p}' file

[Grih65kop]

Спасибо.
А с чем связано столь странное назначение "5" вместо "4"?

[SLEDopit]

А с чем связано столь странное назначение "5" вместо "4"?

С тем что у вас используется mawk.
mawk в отличии от nawk/gawk первый символ считает не нулевым, а первым, поэтому нужно указывать

Код: Выделить всё

mawk 'length>4{print substr($0,1,4)}' file

В случае с nawk и gawk работает

Код: Выделить всё

awk 'length>4{print substr($0,0,4)}' file