Perl 1つのライナーで63文字より長い単語を見つける

Perl 1つのライナーで63文字より長い単語を見つける

私はいくつかありますXML変換するサンスクリット語のテキストを含むファイルテックスエマルジョン各単語の長さは最大63文字でなければなりません。この長さを超える文字はハイフンで連結されません。今私は欲しいgrep私のファイルはこれが唯一の言葉ですgrepこれは適切なツールではないようです。いくつかの単語を使うIASTエンコーディング、その他デバナガリ文字。私が欲しい真珠一行でこれを行うことはできますか?

答え1

この質問に対する正確な回答を提供するために、に基づいて-存在する- これ -コメント(知っているSoblikのメモXML解析は実際にXMLパーサーを使用して行う必要があります。)

perl -CSD -lne 'print for /\w{63,}/g' input-file-here

関連情報