Select Code to Download

 
perl -wle 'open (F, ">test"); print F chr(26) . "Wont get in"; close(F
+);'

  
perl -wle "open (F, '>test'); print F chr(26) . 'Wont get in'; close(F
+);"