Priest in perl