in reply to Replacing $mon with Jan, Feb, Mar by regex or other means

Well, in the CB Coruscate came up with the regex: 
($mon) = localtime =~ /\A.{3} (.{3})/

[download]
Does anybody else think this is a good idea?

In Section Seekers of Perl Wisdom