Beefy Boxes and Bandwidth Generously Provided by pair Networks
Welcome to the Monastery
 
PerlMonks  

Re: Small examples of string eval

by eyepopslikeamosquito (Chancellor)
on May 15, 2006 at 09:30 UTC ( #549413=note: print w/replies, xml ) Need Help??

Help for this page

Select Code to Download


  1. or download this
    do {eval brighten $shirt; exit} unless dirty $shirt && not dress $shir
    +t;
    
  2. or download this
    do {eval unslay $demon; exit} unless evil $demon && not punch $demon;
    
  3. or download this
    eval eval '"'.
                       ("\["^
    ...
              )      )) ))      )
             ))    ))))  )     ))
           ))))               ;#;#