perl 🔮 jackpot