Вопросик по регулярным выражениям Perl

[epros]

Не подскажете как записать регулярное выражение для: "десять любых двоичных цифр, но не все нули"? Десять любых двоичных цифр, очевидно, можно было бы записать как:

/[01]{10}/

А вот как добавить к этому условие, что "не должны быть все нули"?

[Xaositect]

Как вариант:

/[01]{10}(?<!0{10})/

[epros]

О, спасибо. А то я читаю мануал и всё никак не въеду в то, как работают эти "утверждения касательно предшествующего текста".