title: Eval return value
body: <p>Is it correct code?</p>
  <pre><code>my $ttt = eval {
   my @a=(1,2);
   return \@a;
  };
  
  print @$ttt[1]. &quot;\n&quot;;
  </code></pre>
  <p>I thought that an eval block is evaluated on the fly and does not exist after execution. Are there any minuses in that decision?</p>