perl interface to subset difference revocation scheme