What *new* code are you doing in Perl these days?
Me? I just finished a hugely complicated routine that helps map out labor hours based time, selection, and skill set criteria. It was one of the most complicated routines to write and follow that I have ever written. It manages several associative lists of lists.
I try to force myself to learn or master one new Perl concept about once a month. If I don't get any 'code' time for a few months, my wife says I get fairly miserable to live with...
What about you?