./fisher_yates.pl : after 5000 trials shuffling arrays of size 1000:
List::Util::shuffle : 1693 successes, mean:0.0105896962736892, stdev:0.00900688731621982
BUK : 1685 successes, mean:0.010799062825769, stdev:0.00921403469412604
tybalt89 : 1622 successes, mean:0.0102906705829024, stdev:0.00843760632828801