title: Return value from a Perl script
body: <p>Is it possible to return a value (or hashes or arrays) from a Perl script invoked by another?</p>
  <h3>File <em>caller.pl</em></h3>
  <pre><code>printf(&quot;%d&quot;, system(&quot;callee.pl&quot;));
  </code></pre>
  <h3>File <em>callee.pl</em></h3>
  <pre><code>if(&lt;Went good&gt;)
  {
      return(1);
  }
  else
  {
      return(100);
  }
  </code></pre>