Append в .txt файл с конкретным шаблоном

Question

У меня есть файл .txt с 1 слово написано в leet слово «arhie» буквы dividet на «,»

4,1²,#,!,& //a=4,r=1²,h=#,i=!,e=& 
@,2,(-),1,€ //a=@,r=2,h=(-),i=1,e=€ 
/\,?,)-(,|,£ //a=/\,r=?,h=)-(,i=|,e=£ 

мне нужно добавить к этому WordList слово "rarh" с той же схеме

Пример вывода:

4,1²,#,!,&,1²,4,1²,#  // a=4,r=1²,h=#,i=!,e=& 
@,2,(-),1,€,2,@,2,(-) // a=@,r=2,h=(-),i=1,e=€ 
/\,?,)-(,|,£,?,/\,?,)-( // a=/\,r=?,h=)-(,i=|,e=£ 

Я знаю, что perl awk или grep можно использовать для разбора слов, но понятия не имею, как это сделать. Спасибо.

Answer 1

$ awk -F , 'BEGIN { OFS="," } { a=$1;r=$2;h=$3;i=$4;e=$5; print a,r,h,i,e,r,a,r,h }' <<< '4,1²,#,!,& 
@,2,(-),1,€ 
/\,?,)-(,|,£' 
4,1²,#,!,&,1²,4,1²,# 
@,2,(-),1,€,2,@,2,(-) 
/\,?,)-(,|,£,?,/\,?,)-(