This is just for fun; to run the benchmarks, type 'perl bench.pl'
