perl Math-VecStat