libalgorithm-numerical-sample-perl