perl Time-Duration-Parse