perl PAR