Help for this page

Select Code to Download


  1. or download this
    $var = '09';
$trans = '/3+5';
...

eval '$var'.$trans; # eval gets '$var/3+5'
                    # result: 8
  2. or download this
    use Devel::Peek;
$var = '09';
...
  CUR = 2
  LEN = 10
  COW_REFCNT = 0