perl blooming in the dark