Как удалить цветовые коды из стандартного вывода и передать в файл и стандартный вывод

14

У меня есть программа, которая использует printfнекоторые tputсмешанные в ней, и я хотел бы направить вывод на стандартный вывод, а также файл. Я бы предпочел использовать, 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...

iamnewton
источник
@ StephaneChazelas, я сейчас пытаюсь не использовать ни один из сценариев Perl, и даже sedпараметры не работают.
Iamnewton

Ответы:

12

В соответствии с удалением цветов из вывода , ваша команда должна быть:

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.!.
Сообщество
источник
1
этот -rфлаг не работает на Mac BSD, поэтому я попытался использовать -Eего, похоже, он был бы наиболее похожим, и он все равно выводится в лог-файл как таковой ... ^[36m| ^[(B^[[m^[[37mSourcing files...^[[m Он также возвращается, как | ^[(BSourcing files...на моем Linux-боксе.
Iamnewton
Пожалуйста, покажите нам вывод вашей команды print print |xxdи вашего TERMenv. вар.
TERM=> xterm. 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.!.
Iamnewton
1
он все еще проверяет те же результаты, за исключением того, что я должен изменить stripcolorsфункцию, потому что Mac OS X не понимает -rопцию для sedкоманды. Я предполагаю, что вы находитесь в каком-то дистрибутиве Linux?
iamnewton
3
К сожалению, это не работает на OS X.
Хорхе Букаран