It would be good for you to wrap your code with code tags instead of pre tags, so a download code link would appear.
I didn't use <code></code> tags for this script simply because PerlMonks doesn't display the Unicode suit characters ♠, ♥, ♦ and ♣ properly when I do. See these discussions of the topic.
Here's what the same script looks like when I enclose it in <code></code> tags:
|