Как вывети все не закоментираванеы строки из файле ?

[CyberTramp]

Есть ли такая утилита чтобы показывала только не закоментированые строки ?

[Disaster1986]

Код: [Выделить]

grep ^[^#] filename

[andrey_p]

Млин... Язык то какой? Если скрипт, то есть:

Код: [Выделить]

sed '/^ *#/d' или

Код: [Выделить]

grep -v '^ *#'

[CyberTramp]

Ок  а как не отображать полный вывод

пример
tail -f /var/log/mail.log

Код: [Выделить]

May 16 15:40:46 mail postfix/master[17950]: warning: process /usr/lib/postfix/smtp pid 18166 exit status 1
May 16 15:40:46 mail postfix/master[17950]: warning: /usr/lib/postfix/smtp: bad command startup -- throttling
May 16 15:41:46 mail postfix/smtp[18206]: fatal: open database /etc/postfix/saslpasswd.db: No such file or directory
May 16 15:41:47 mail postfix/master[17950]: warning: process /usr/lib/postfix/smtp pid 18206 exit status 1
May 16 15:41:47 mail postfix/master[17950]: warning: /usr/lib/postfix/smtp: bad command startup -- throttling

как убрать May 16 15:41:47 mail postfix/master[17950] и ему подобные ?

[RustemNur]

man cut
(http://www.opennet.ru/man.shtml?topic=cut&russian=0&category=&submit=%F0%CF%CB%C1%DA%C1%D4%D8+man)

[RazrFalcon]

Код: [Выделить]

tail -f /var/log/mail.log | sed 's/.*\]://g'


[andrey_p]

cut не сработает, ему или таб или точные номера колонок подавай.
sed - работает, но решение не обще.
awk - только через for цикл - целую программку городить надо.
Но есть же swiss army knife :

Код: [Выделить]

perl -alne 'print "@F[5..$#F]"'

[RazrFalcon]

Зачем же использовать этот perl.... 

[andrey_p]

Этот Perl еще всех вас и нас переживет.

Код: [Выделить]

use perl or die;