Select Code to Download

  $ perl thread.pl -N=100
  Time taken w/ threads: 0.0077 seconds
  Time taken w/ forks: 0.0021 seconds

#! perl -slw
use strict;
...
if (dump($complexData) ne dump($complexData2)) {
    warn "Data did not match!";
}