printf
を使用し、いくつかのtput
を混合したプログラムがあります。出力をstdoutとファイルにパイプしたいのですが。スクリプトに不要な依存関係を付けたくないので、sed
を使用したいと思います。これが私がこれまでに得たものです。
printf "\n$(tput setaf 6)| $(tput sgr0)$(tput setaf 7)Sourcing files...\033[m\n" | tee install.log
これに関する唯一の問題は、ログファイルがすべてのカラー出力を取得することです...
^[[36m| ^[(B^[[m^[[37mSourcing files...^[[m
| Sourcing files...
出力から色を削除する によると、コマンドは次のようになります。
printf "\n$(tput setaf 6)| $(tput sgr0)$(tput setaf 7)Sourcing files...\033[m\n" |\
sed -r "s/\x1B\[([0-9]{1,2}(;[0-9]{1,2})?)?[mGK]//g" |tee install.log
w/o "-r"
sed "s/\x1B\[\([0-9]\{1,2\}\(;[0-9]\{1,2\}\)\?\)\?[mGK]//g"
便宜上、/etc/profile
にエイリアスを作成することもできます
alias stripcolors='sed -r "s/\x1B\[([0-9]{1,2}(;[0-9]{1,2})?)?[mGK]//g"'
w/o '-r'
alias stripcolors='sed "s/\x1B\[\([0-9]\{1,2\}\(;[0-9]\{1,2\}\)\?\)\?[mGK]//g"'
[編集]
与えられた出力を使用して、これを自分で確認できます。
#!/usr/bin/Perl
while ($line=<DATA>) {
$line =~ s/^[0-9a-f]+: //;
while ($line =~ s/([0-9a-f]{2})(?=[0-9a-f]{2}| )//) {
print chr(hex($1));
}
}
__DATA__
0000000: 1b5b 316d 1b5b 3333 6de2 9aa0 2020 5761 .[1m.[33m... Wa
0000010: 726e 696e 673a 201b 2842 1b5b 6d4e 6f20 rning: .(B.[mNo
0000020: 2f55 7365 7273 2f61 7077 2f2e 6261 7368 /Users/apw/.bash
0000030: 2066 6f75 6e64 2e21 0a found.!.
出力:
$ Perl checkerbunny|xxd
0000000: 1b5b 316d 1b5b 3333 6de2 9aa0 2020 5761 .[1m.[33m... Wa
0000010: 726e 696e 673a 201b 2842 1b5b 6d4e 6f20 rning: .(B.[mNo
0000020: 2f55 7365 7273 2f61 7077 2f2e 6261 7368 /Users/apw/.bash
0000030: 2066 6f75 6e64 2e21 0a found.!.
$ Perl checkerbunny|stripcolors|xxd
0000000: e29a a020 2057 6172 6e69 6e67 3a20 1b28 ... Warning: .(
0000010: 424e 6f20 2f55 7365 7273 2f61 7077 2f2e BNo /Users/apw/.
0000020: 6261 7368 2066 6f75 6e64 2e21 0a bash found.!.