Help for this page
#!/usr/bin/perl -slw use strict; ... printf "Buckets used: %d, total values %d \n", scalar keys %bins, sum values %bins;
perl -s theScript.pl -X=100 -Y=100