Help for this page

Select Code to Download


  1. or download this
      DB<53> $EVIL= ',@{[say "kill all kitties!"]}'

...
1
  DB<58> eval $str
kill all kitties!
  2. or download this
      DB<80> @list = eval ",1..3"; unless($@){say for @list }

...

  DB<82> @list = eval "1.3"; unless($@){say for @list }
1.3