add perl script to get useful info from mahout seq