ファイル名の特定部分とその内容のリスト

Question 1

使用幸せ（以前のPerl_6）

~$ raku -e 'for dir(test => / \.config $/ ) -> $fh {
                put join " : ",
                    $_.split(/ \s* \= \s* /)[1],
                    $fh.match(/ <?after wifi_ > .*? <?before _managed > /)
                for $fh.lines.grep(/^Name/)
             };'

このソリューションは、Perl プログラミング言語スイートに属する Raku を使用します。上記のコードはRakudir()とgrep()ルーチンに依存しているため、既存のシェルベースのファイルグロービングが存在しないか制限されているプラットフォームで役立ちます（SO議論を参照）。ここ）。

簡単に言えば、rakuは-eオプションで呼び出されます。このオプションは、Rakuのコンパイラ（Rakudo）に、指定された単一のライナーをコンパイルして実行するように指示します。このメソッドは、Rakuにフィルタから取得したファイル名の値を繰り返すように指示するdir()キーワードとともに呼び出されます。各結果ファイル名は一時変数に割り当てられ、ブロック内で繰り返されます。fortest => / \.config $/$fh

ブロック内にある場合（右から左に読み取る）、$fh.lines.grep(/^Name/)各ファイルハンドルを1行ずつ分析して、「Name」というテキストで始まる行があることを確認します。見つかった場合、Rakuは自動的に行を$_テーマ変数に割り当て、空白/等号に分割し、.[1]2番目の要素（SSID値）を分離します。
ファイル名も最終形式に調整され、$fh「wifi_」テキストの後と「_management」テキストの前にある.*?0個以上の文字を区切ります。<?after wifi_ ><?before _managed >
結果の出力は要求された空白/コロンで編集されput、ファイル名部分で始まり、その後にSSID値が続きます。join:

入力例（パスワード）：

~$ ls *.config
wifi_778899ad_112233445566_managed_none.config      wifi_ff001122334_567890123456_managed_psk.config

~$ cat wifi_778899ad_112233445566_managed_none.config
Name : SSIDabcd
junk
Name : SSIDefgh

~$ cat wifi_ff001122334_567890123456_managed_psk.config
Name : SSID1234
junk
Name : SSID5678

出力例：

SSIDabcd : 778899ad_112233445566
SSIDefgh : 778899ad_112233445566
SSID1234 : ff001122334_567890123456
SSID5678 : ff001122334_567890123456

上記のファイル名のテキスト部分を分離することは、matchRakuの新しいプレビュー/振り返りイディオムに依存します。<(Rakuの)>「キャプチャマーカー」を使用するには、タスクをmatch次のように変更できます。

$fh.match(/ wifi_ <( .*? )> _managed /)

https://docs.raku.org/routine/dir
https://docs.raku.org/routine/grep
https://raku.org

Answer

使用幸せ（以前のPerl_6）

~$ raku -e 'for dir(test => / \.config $/ ) -> $fh {
                put join " : ",
                    $_.split(/ \s* \= \s* /)[1],
                    $fh.match(/ <?after wifi_ > .*? <?before _managed > /)
                for $fh.lines.grep(/^Name/)
             };'