wow perl