title: Dequeue an array in perl with thread::queue
body: <p>I am trying to process data with a set of threads and enqueue it with another, currently the enqueueing and dequeueing process doesn't seem to be working</p>
  
  <p>Any thoughs??</p>
  
  <pre><code>sub process() {
      while (my @DataElement = $DataQueue->dequeue()) {
          print "\t".$DataElement[0]."\n";
      }
  }
  </code></pre>
  
  <p>I use the following to enqueue the data</p>
  
  <pre><code>
  my @l;
  push(@l, $directories.$suffix);
  push(@l, "testclass");
  push(@l, $eachFile);
  $DataQueue->enqueue(\@l);
  </code></pre>