Awhile back, some girl, I assume, asked how she could make flowers with Perl. Everyone directed her to various ascii art modules or 2d graphics libraries, my personal offering would have been Tk::Zinc generation of petals. That code is quite complicated.

But as the winter freeze sets in on my camp, I have found an ever-blooming flower, which can be generated with a single line of Perl code.
screenshot 1 screenshot 2