Додавання пропущених нулів на початку кожного рядка, де менше 4 знаків

Я б запитав вас, як вирішити цю проблему: мені потрібно поставити 0 у кожному рядку, де слово має менше 4 знаків.

Приклад вхідного файлу:

30
1
508
A0EA
A0EB
A0EC
A0ED

Бажаний вихід повинен бути:

0030
0001
0508
A0EA
A0EB
A0EC
A0ED

Заздалегідь дякую за підтримку.

Ви можете додати 4 провідні нулі до всіх рядків, а потім отримати 4 останні символи кожного:

sed 's/^/0000/; s/^.*\(.\{4\}\)/\1/' < file

Або уникати обрізання чисел, шириною яких було більше 4 цифр:

sed 's/^/0000/; s/^.\{1,4\}\(.\{4\}\)/\1/' < file

Ще один для суміші:

$ numfmt --format='%04.0f' --invalid=ignore < file
0030
0001
0508
A0EA
A0EB
A0EC
A0ED

numfmt надається пакетом GNU Coreutils.

З GNU awk для strtonum (), якщо ваш вхід є шістнадцяткові числа:

$ awk '{printf "%04X\n", strtonum("0x"$0)}' file
0030
0001
0508
A0EA
A0EB
A0EC
A0ED

Якщо GNU awk незалежно від того, чи є ваш внесок шестигранним чи ні:

$ awk '{print gensub(/ /,0,"g",sprintf("%4s",$0))}' file
0030
0001
0508
A0EA
A0EB
A0EC
A0ED

З будь-яким дивом, чи є ваш внесок шістнадцятковим чи ні:

$ awk '{v=sprintf("%4s",$0); gsub(/ /,0,v); print v}' file
0030
0001
0508
A0EA
A0EB
A0EC

або навіть:

$ awk '{$0=sprintf("%4s",$0); gsub(/ /,0)} 1' file
0030
0001
0508
A0EA
A0EB
A0EC
A0ED

За допомогою zshоболонки ви можете використовувати l:length::string:прапор розширення зліва-padding.

$ var=FF
$ echo ${(l:4::0:)var}
00FF

Щоб застосувати його до кожного слова у файлі:

printf '%s\n' ${(l:4::0:)$(<file)}

Зауважте, що цей оператор також усіма словами, розмірами більше 4 символів.

Якщо значення вже знаходяться всередині оболонки і є всі шістнадцяткові числа:

$ set -- 30 1 508 A0EA A0EB A0EC A0ED
$ for var; do printf '%04X\n' "0x$var"; done
0030
0001
0508
A0EA
A0EB
A0EC
A0ED

Якщо значення рядка можуть бути будь-якими рядками (навіть довше 4 символів) і lineмістять значення (и) рядка, рішення стає складнішим:

[ "${#line}" -lt 4 ] && 
    printf '%0*d%s\n' "$((4-${#line}))" 0 "$line" || 
        printf '%s\n' "${line}"

буде надрукувати значення з такою кількістю нулів, скільки потрібно для створення рядка в 4 символи.

Потім для зовнішнього файлу (sed і awk рішення швидші для зовнішніх файлів) зробіть цикл і розгорніть код, щоб зробити його більш розбірливим як:

while read -r line; do
    if [ "${#line}" -lt 4 ]; then 
        printf '%0*d%s\n' "$((4-${#line}))" 0 "$line"
    else
        printf '%s\n' "${line}"
    fi
done <file

$ perl -ne 'printf "%05s", $_' ip.txt
0030
0001
0508
A0EA
A0EB
A0EC
A0ED

Використовуючи 5замість 4тут, оскільки в кожному рядку також є символ нового рядка. Рядки з більш ніж 5 символами будуть надруковані як є.

Менш елегантний спосіб:

cat file | sed 's/^\(...\)$/0\1/' | sed 's/^\(..\)$/00\1/' | sed 's/^\(.\)$/000\1/'

Використання Posix sed:

  sed -e ':a;s/^.\{0,3\}$/0&/;ta'

Це свого роду кульгавий (файли повинні бути коротшими за getconf ARG_MAXбайти), але це працює:

printf '%4s\n' $(<file) | tr ' ' 0

cat file.txt | awk -vlen=4 '{
  add=""          #empty prefix to be added

  if(length($1)!=len){
       for(i=(len-length($1));i<=length($1);i++)
           add=add"0"          #add prefix as necessary
  }

  print $1""add

 }'

Не соромтеся змінювати змінну lenна свій смак.

Я зробив, використовуючи if умова та awk

count_line=`awk '{print NR}' p.txt| sed -n '$p'`

for ((i=1;i<=$count_line;i++)); do j=`awk -v i="$i" -F "" 'NR==i{print NF}' p.txt`; if [[ $j == "1" ]]; then awk -v i="$i" -F "" 'NR==i{print "000"$0}' p.txt; elif [[ $j == "2" ]]; then awk -v i="$i" -F "" 'NR==i{print "00"$0}' p.txt ; elif [[ $j == "3" ]]; then awk -v i="$i" -F "" 'NR==i{print "0"$0}' p.txt; else awk -v i="$i" 'NR==i{print $0}' p.txt; fi; done

вихід

0030
0001
0508
A0EA
A0EB
A0EC
A0ED