shell - 特定の列と行に値を挿入する方法は？

Question

例：cattesting_file.txtは

入力：

ABC
ABC                   

期待される出力：

ACB
CBA

質問：

1）特定の列と行に値を挿入する方法は？

Answer 1

これはシェルで行う必要がありますか？Perlでは簡単です。

#! /usr/bin/perl

use warnings;
use strict;

while (<>)
{
  unless (/^<234>/)
  {
    my ($from_pos, $length, $to_pos)
        = /^<!!!>/ ? (21, 4, 6) : (7, 3, 21);
    my $old = substr $_, $from_pos, $length, '0' x $length;
    substr $_, $to_pos, $length, $old;
  }

  print;
}

substrはゼロベースであるため、$from_posは22または8ではなく21または7であることに注意してください。