テキストファイルの行ペアの順序を逆に置き換えます。

Question 1

ヘッダーを印刷し、各ペアの行を置き換えてから全体を反転します。

{ head -n 1; { sed -n 'h;n;G;p' | tac; } ; } < infile

tail -rtacお使いのシステムで利用できない場合はお試しください。また、一部の設定ではhead愚かで動作しないため、動作しません。基準を満たしていません。- もう一つの簡単な方法は次のとおりですsed q。

{ sed q; { sed -n 'h;n;G;p' | tail -r; } ; } < infile

Answer

ヘッダーを印刷し、各ペアの行を置き換えてから全体を反転します。

{ head -n 1; { sed -n 'h;n;G;p' | tac; } ; } < infile

tail -rtacお使いのシステムで利用できない場合はお試しください。また、一部の設定ではhead愚かで動作しないため、動作しません。基準を満たしていません。- もう一つの簡単な方法は次のとおりですsed q。

{ sed q; { sed -n 'h;n;G;p' | tail -r; } ; } < infile

Question 2

echo '#EXTM3U';grep -v ^#EXTM3U m3u |sed 'N;s/\n/ /'|sed -e 's/\(.*\)\(http.*\)$/\2\n\1/'|tac

Answer

echo '#EXTM3U';grep -v ^#EXTM3U m3u |sed 'N;s/\n/ /'|sed -e 's/\(.*\)\(http.*\)$/\2\n\1/'|tac

Question 3

より短い解決策があります。しかし、次のようtacになります。headsed

$ head -n 1 f;sed -n '1!{N;2,3!G;h;$p}' f;
#EXTM3U
#EXTINF:-1,AL: TV Uskana
http://mydomain.org:8000/live/username/mypass/8.ts
#EXTINF:-1,AL: Top Channel Beckup
http://mydomain.org:8000/live/username/mypass/7.ts
#EXTINF:-1,AL: Top Channel HD
http://mydomain.org:8000/live/username/mypass/6.ts
#EXTINF:-1,AL: Top Channel SD
http://mydomain.org:8000/live/username/mypass/5.ts
#EXTINF:-1,AL: Klan Kosova (B)
http://mydomain.org:8000/live/username/mypass/4.ts
#EXTINF:-1,AL: Klan Kosova
http://mydomain.org:8000/live/username/mypass/3.ts
#EXTINF:-1,AL: Klan HD Beckup
http://mydomain.org:8000/live/username/mypass/2.ts
#EXTINF:-1,AL: Klan HD (AL)
http://mydomain.org:8000/live/username/mypass/1.ts

Answer

より短い解決策があります。しかし、次のようtacになります。headsed

$ head -n 1 f;sed -n '1!{N;2,3!G;h;$p}' f;
#EXTM3U
#EXTINF:-1,AL: TV Uskana
http://mydomain.org:8000/live/username/mypass/8.ts
#EXTINF:-1,AL: Top Channel Beckup
http://mydomain.org:8000/live/username/mypass/7.ts
#EXTINF:-1,AL: Top Channel HD
http://mydomain.org:8000/live/username/mypass/6.ts
#EXTINF:-1,AL: Top Channel SD
http://mydomain.org:8000/live/username/mypass/5.ts
#EXTINF:-1,AL: Klan Kosova (B)
http://mydomain.org:8000/live/username/mypass/4.ts
#EXTINF:-1,AL: Klan Kosova
http://mydomain.org:8000/live/username/mypass/3.ts
#EXTINF:-1,AL: Klan HD Beckup
http://mydomain.org:8000/live/username/mypass/2.ts
#EXTINF:-1,AL: Klan HD (AL)
http://mydomain.org:8000/live/username/mypass/1.ts

Question 4

Raku（以前のPerl_6）の使用

raku -e '.join("\n").put for lines.rotor(2).reverse;'

入力例：

#EXTINF:-1,AL: Klan HD (AL)
http://mydomain.org:8000/live/username/mypass/1.ts
#EXTINF:-1,AL: Klan HD Beckup
http://mydomain.org:8000/live/username/mypass/2.ts
#EXTINF:-1,AL: Klan Kosova
http://mydomain.org:8000/live/username/mypass/3.ts
#EXTINF:-1,AL: Klan Kosova (B)
http://mydomain.org:8000/live/username/mypass/4.ts
#EXTINF:-1,AL: Top Channel SD
http://mydomain.org:8000/live/username/mypass/5.ts
#EXTINF:-1,AL: Top Channel HD
http://mydomain.org:8000/live/username/mypass/6.ts
#EXTINF:-1,AL: Top Channel Beckup
http://mydomain.org:8000/live/username/mypass/7.ts
#EXTINF:-1,AL: TV Uskana
http://mydomain.org:8000/live/username/mypass/8.ts

出力例：

#EXTINF:-1,AL: TV Uskana
http://mydomain.org:8000/live/username/mypass/8.ts
#EXTINF:-1,AL: Top Channel Beckup
http://mydomain.org:8000/live/username/mypass/7.ts
#EXTINF:-1,AL: Top Channel HD
http://mydomain.org:8000/live/username/mypass/6.ts
#EXTINF:-1,AL: Top Channel SD
http://mydomain.org:8000/live/username/mypass/5.ts
#EXTINF:-1,AL: Klan Kosova (B)
http://mydomain.org:8000/live/username/mypass/4.ts
#EXTINF:-1,AL: Klan Kosova
http://mydomain.org:8000/live/username/mypass/3.ts
#EXTINF:-1,AL: Klan HD Beckup
http://mydomain.org:8000/live/username/mypass/2.ts
#EXTINF:-1,AL: Klan HD (AL)
http://mydomain.org:8000/live/username/mypass/1.ts

Rakuの良いことは基本的にUnicodeをサポートしているので、上記のRakuコードはm3u（Unicodeプレイリスト）と問題なく処理できるはずです。m3u8

#EXTM3U最初の行（ ""）を無視すると、Rakuコードは非常に簡単です。行はペアで（ゆっくりと）読み取られ、rotor逆順に並べられ、\n各ペアの間に改行文字が印刷されます。

[覚えておくべき唯一のことrotorは、「セット」を完了するのに必要な要素（行など）が十分でない場合は、rotor最後に自動的に要素を削除することです。最後に不完全な「セット」を維持するには]のbatch代わりに使用してくださいrotor。

ああ、最初の行について：Rakuの最も簡単な方法は、おそらく#EXTM3Uafter but beforeに呼び出しを挿入し、最後に手動で行を追加することです。.skip(1)lines.rotor#EXTM3U

https://raku.org

Answer