set regexp to "s/.*(.*) .*/$1/g" as Unicode text
perl -Mutf8 -e 'utf8::decode($ARGV[0]); print $ARGV[0] if($ARGV[0] =~ " & regexp & ")'
- $1,$2,$3,..
- 正規表現の(括弧)内にマッチしたものが格納されます。
- -e
- この部分がスクリプトであることを示すオプション。
- スクリプトを指定する場合には,引用符で囲む。
- s
- s/文字列/置換文字列/
- 「文字列」を「置換文字列」で置き換える。「文字列」は正規表現で指定する。
- 「文字列」を囲む文字は / 以外のものも使える。「文字列」「置換文字列」には変数を使うこともできる。
- g
- マッチする全ての文字列を対象とする。これがないと,マッチングは一度のみ,置換の場合は最初にマッチするものしか置換しない。
- =~
- パターン結合演算子と呼ばれ、「左辺の値から右辺の値を検索する」という意味があります。