Skip to main content
本文に 6 文字追加
ソース リンク
user39889
user39889
$ printf '\0漢字\nHello World\nGood night\n' > input_file
$ od -tx1c input_file
0000000  00  e6  bc  a2  e5  ad  97  0a  48  65  6c  6c  6f  20  57  6f
         \0 346 274 242 345 255 227  \n   H   e   l   l   o       W   o
0000020  72  6c  64  0a  47  6f  6f  64  20  6e  69  67  68  74  0a
          r   l   d  \n   G   o   o   d       n   i   g   h   t  \n

$ gawk --characters-as-bytes -v f=input_file -l readfile -i join '
      BEGIN{
        len = split(readfile(f), data, "")
        data[1] = "\x0c"; data[15] = "w"; data[26] = "N"
        printf("%s", join(data, 1, len, SUBSEP))
        exit
      }
    ' | od -tx1c
0000000  0c  e6  bc  a2  e5  ad  97  0a  48  65  6c  6c  6f  20  77  6f
         \f 346 274 242 345 255 227  \n   H   e   l   l   o       w   o
0000020  72  6c  64  0a  47  6f  6f  64  20  4e  69  67  68  74  0a
          r   l   d  \n   G   o   o   d       N   i   g   h   t  \n
$ printf '\0漢字\nHello World\nGood night\n' > input_file
$ od -tx1c input_file
0000000  00  e6  bc  a2  e5  ad  97  0a  48  65  6c  6c  6f  20  57  6f
         \0 346 274 242 345 255 227  \n   H   e   l   l   o       W   o
0000020  72  6c  64  0a  47  6f  6f  64  20  6e  69  67  68  74  0a
          r   l   d  \n   G   o   o   d       n   i   g   h   t  \n

$ gawk --characters-as-bytes -v f=input_file -l readfile -i join '
      BEGIN{
        len = split(readfile(f), data, "")
        data[1] = "\x0c"; data[15] = "w"; data[26] = "N"
        printf(join(data, 1, len, SUBSEP))
        exit
      }
    ' | od -tx1c
0000000  0c  e6  bc  a2  e5  ad  97  0a  48  65  6c  6c  6f  20  77  6f
         \f 346 274 242 345 255 227  \n   H   e   l   l   o       w   o
0000020  72  6c  64  0a  47  6f  6f  64  20  4e  69  67  68  74  0a
          r   l   d  \n   G   o   o   d       N   i   g   h   t  \n
$ printf '\0漢字\nHello World\nGood night\n' > input_file
$ od -tx1c input_file
0000000  00  e6  bc  a2  e5  ad  97  0a  48  65  6c  6c  6f  20  57  6f
         \0 346 274 242 345 255 227  \n   H   e   l   l   o       W   o
0000020  72  6c  64  0a  47  6f  6f  64  20  6e  69  67  68  74  0a
          r   l   d  \n   G   o   o   d       n   i   g   h   t  \n

$ gawk --characters-as-bytes -v f=input_file -l readfile -i join '
      BEGIN{
        len = split(readfile(f), data, "")
        data[1] = "\x0c"; data[15] = "w"; data[26] = "N"
        printf("%s", join(data, 1, len, SUBSEP))
        exit
      }
    ' | od -tx1c
0000000  0c  e6  bc  a2  e5  ad  97  0a  48  65  6c  6c  6f  20  77  6f
         \f 346 274 242 345 255 227  \n   H   e   l   l   o       w   o
0000020  72  6c  64  0a  47  6f  6f  64  20  4e  69  67  68  74  0a
          r   l   d  \n   G   o   o   d       N   i   g   h   t  \n
本文から 6 文字削除
ソース リンク
user39889
user39889
$ printf '\0漢字\nHello World\nGood night\n' > input_file
$ od -tx1a1c input_file
0000000  00  e6  bc  a2  e5  ad  97  0a  48  65  6c  6c  6f  20  57  6f
        nul   f   <   " \0 346 e274 242 345 -255 etb227  nl\n   H   e   l   l   o  sp     W   o
0000020  72  6c  64  0a  47  6f  6f  64  20  6e  69  67  68  74  0a
          r   l   d  nl\n   G   o   o   d  sp     n   i   g   h   t  nl\n

$ gawk --characters-as-bytes -v f=input_file -l readfile -i join '
  @load "readfile"
   BEGIN{
        len = split(readfile(f), data, "")
        data[1] = "\x0c"; data[15] = "w"; data[26] = "N"
    for(i=1;i<=len;i++){
      printf(join(data[i], 1, len, SUBSEP))
    }
    exit
      }
    ' | od -tx1a
1c
0000000  0c  e6  bc  a2  e5  ad  97  0a  48  65  6c  6c  6f  20  77  6f
         ff   f   <   " \f 346 e274 242 345 -255 etb227  nl\n   H   e   l   l   o  sp     w   o
0000020  72  6c  64  0a  47  6f  6f  64  20  4e  69  67  68  74  0a
          r   l   d  nl\n   G   o   o   d  sp     N   i   g   h   t  nl\n
$ printf '\0漢字\nHello World\nGood night\n' > input_file
$ od -tx1a input_file
0000000  00  e6  bc  a2  e5  ad  97  0a  48  65  6c  6c  6f  20  57  6f
        nul   f   <   "   e   - etb  nl   H   e   l   l   o  sp   W   o
0000020  72  6c  64  0a  47  6f  6f  64  20  6e  69  67  68  74  0a
          r   l   d  nl   G   o   o   d  sp   n   i   g   h   t  nl

$ gawk --characters-as-bytes -v f=input_file '
  @load "readfile"
  BEGIN{
    len = split(readfile(f), data, "")
    data[1] = "\x0c"; data[15] = "w"; data[26] = "N"
    for(i=1;i<=len;i++){
      printf(data[i])
    }
    exit
  }
' | od -tx1a

0000000  0c  e6  bc  a2  e5  ad  97  0a  48  65  6c  6c  6f  20  77  6f
         ff   f   <   "   e   - etb  nl   H   e   l   l   o  sp   w   o
0000020  72  6c  64  0a  47  6f  6f  64  20  4e  69  67  68  74  0a
          r   l   d  nl   G   o   o   d  sp   N   i   g   h   t  nl
$ printf '\0漢字\nHello World\nGood night\n' > input_file
$ od -tx1c input_file
0000000  00  e6  bc  a2  e5  ad  97  0a  48  65  6c  6c  6f  20  57  6f
         \0 346 274 242 345 255 227  \n   H   e   l   l   o       W   o
0000020  72  6c  64  0a  47  6f  6f  64  20  6e  69  67  68  74  0a
          r   l   d  \n   G   o   o   d       n   i   g   h   t  \n

$ gawk --characters-as-bytes -v f=input_file -l readfile -i join '
      BEGIN{
        len = split(readfile(f), data, "")
        data[1] = "\x0c"; data[15] = "w"; data[26] = "N"
        printf(join(data, 1, len, SUBSEP))
        exit
      }
    ' | od -tx1c
0000000  0c  e6  bc  a2  e5  ad  97  0a  48  65  6c  6c  6f  20  77  6f
         \f 346 274 242 345 255 227  \n   H   e   l   l   o       w   o
0000020  72  6c  64  0a  47  6f  6f  64  20  4e  69  67  68  74  0a
          r   l   d  \n   G   o   o   d       N   i   g   h   t  \n
user16894によって削除が取り消された投稿
本文に 849 文字追加
ソース リンク
user39889
user39889

GNU awk には拡張機能として、ファイル全体を配列変数に読み込む readfile 関数が用意されています。以下では  ファイル全体を読み込んだ後、1 byte 単位で分割して配列変数(data 変数)読み込んでセットしています。その後その一部を変更して出力しています。

$ printf '\0漢字\nHello World\nGood night\n' > input_file
$ od -tx1a input_file
0000000  00  e6  bc  a2  e5  ad  97  0a  48  65  6c  6c  6f  20  57  6f
        nul   f   <   "   e   - etb  nl   H   e   l   l   o  sp   W   o
0000020  72  6c  64  0a  47  6f  6f  64  20  6e  69  67  68  74  0a
          r   l   d  nl   G   o   o   d  sp   n   i   g   h   t  nl

$ gawk --characters-as-bytes -v f=input_file '
  @load "readfile"
  BEGIN{
    len = split(readfile(f), data, "")
    data[1] = "\x0c"; data[15] = "w"; data[26] = "N"
    for(i=1;i<=len;i++){
      printf(data[i])
    }
    exit
  }
' | od -tx1a

0000000  000c  e6  bc  a2  e5  ad  97  0a  48  65  6c  6c  6f  20  77  6f
        nul ff   f   <   "   e   - etb  nl   H   e   l   l   o  sp   w   o
0000020  72  6c  64  0a  47  6f  6f  64  20  4e  69  67  68  74  0a
          r   l   d  nl   G   o   o   d  sp   N   i   g   h   t  nl

GNU awk には拡張機能として、ファイル全体を配列変数に読み込む readfile 関数が用意されています。以下では  data 変数読み込んでその一部を変更しています。

$ printf '\0漢字\nHello World\nGood night\n' > input_file
$ od -tx1a input_file
0000000  00  e6  bc  a2  e5  ad  97  0a  48  65  6c  6c  6f  20  57  6f
        nul   f   <   "   e   - etb  nl   H   e   l   l   o  sp   W   o
0000020  72  6c  64  0a  47  6f  6f  64  20  6e  69  67  68  74  0a
          r   l   d  nl   G   o   o   d  sp   n   i   g   h   t  nl

$ gawk --characters-as-bytes -v f=input_file '
  @load "readfile"
  BEGIN{
    len = split(readfile(f), data, "")
    data[15] = "w"; data[26] = "N"
    for(i=1;i<=len;i++){
      printf(data[i])
    }
    exit
  }
' | od -tx1a

0000000  00  e6  bc  a2  e5  ad  97  0a  48  65  6c  6c  6f  20  77  6f
        nul   f   <   "   e   - etb  nl   H   e   l   l   o  sp   w   o
0000020  72  6c  64  0a  47  6f  6f  64  20  4e  69  67  68  74  0a
          r   l   d  nl   G   o   o   d  sp   N   i   g   h   t  nl

GNU awk には拡張機能として、ファイル全体を読み込む readfile 関数が用意されています。以下ではファイル全体を読み込んだ後、1 byte 単位で分割して配列変数(data)セットしています。その後、一部を変更して出力しています。

$ printf '\0漢字\nHello World\nGood night\n' > input_file
$ od -tx1a input_file
0000000  00  e6  bc  a2  e5  ad  97  0a  48  65  6c  6c  6f  20  57  6f
        nul   f   <   "   e   - etb  nl   H   e   l   l   o  sp   W   o
0000020  72  6c  64  0a  47  6f  6f  64  20  6e  69  67  68  74  0a
          r   l   d  nl   G   o   o   d  sp   n   i   g   h   t  nl

$ gawk --characters-as-bytes -v f=input_file '
  @load "readfile"
  BEGIN{
    len = split(readfile(f), data, "")
    data[1] = "\x0c"; data[15] = "w"; data[26] = "N"
    for(i=1;i<=len;i++){
      printf(data[i])
    }
    exit
  }
' | od -tx1a

0000000  0c  e6  bc  a2  e5  ad  97  0a  48  65  6c  6c  6f  20  77  6f
         ff   f   <   "   e   - etb  nl   H   e   l   l   o  sp   w   o
0000020  72  6c  64  0a  47  6f  6f  64  20  4e  69  67  68  74  0a
          r   l   d  nl   G   o   o   d  sp   N   i   g   h   t  nl
本文に 849 文字追加
ソース リンク
user39889
user39889
読み込んでいます
削除済み投稿 (投票者: user16894)
user16894によって削除が取り消された投稿
本文から 22 文字削除
ソース リンク
user39889
user39889
読み込んでいます
削除済み投稿 (投票者: user16894)
ソース リンク
user39889
user39889
読み込んでいます