title: get param function array in perl
body: <p>I want to get the array that I send in my function but it seem's to be empty.
  I call <code>send_file();</code> with an array in the param</p>
  
  <pre><code>send_file($addr, @curfile);
  </code></pre>
  
  <p>And this is the way I get back the param</p>
  
  <pre><code>sub send_file($$)
  {
      my $addr = $_[0];
      my @elem = @_;
      ...
  }
  </code></pre>
  
  <p>Why <code>my @elem</code> is empty ? How could I get back the array without losing everything ?</p>