RegExp

#!/usr/bin/perl
while (<STDIN>) {
s/^(?!string|qwe).*//;
print;
}

$ .. | grep -v "^string" | grep -v "^qwe"

спс!

2Sphinx: это знал, интересовал именно сам регекс ;)

А grep -P ^(?!string|qwe) работать должен?

2acheron нет, но если так: grep -P '^(?!string|qwe)' :)

Спасибо.