В Perl \ S соответствует любому непробельному символу.
\ S
Как я могу сопоставить любой непробельный символ, кроме обратной косой черты \ ?
\