string - perlでフォーマットされた文字列を検索して置換する

Question

次のようなファイルがあります。

マイファイル

Hello     World
Hello     World
Hello     World
Hello
Hello
Hello     World
Hello     World

私がやりたいのは、ファイル内の「Hello」という単語だけが含まれる行を検索して「Hello World」という文字列に置き換え、ファイル内に既にあるものと同じ間隔を維持することです (たとえば、10 文字の幅としましょう) H から W)。

私がこれまでに持っているもの：

perl -pi -e 's/Hello/Hello World/' myFile

うまくいかなかったことはわかっていますが、かなり長い間これをグーグルで検索していて、何をする必要があるのか​​ わかりません..

どんな助けでも大歓迎です!! ありがとう！！

Answer 1

perl -i -pe '$t=$1 and next if /Hello(\s+)World/; s/Hello\K/${t}World/' myFile