Mini Perl contest. The smallest amount of characters wins. The purpose is to convert every word with more than two characters to the following format: (first_letter)(number_of_letters_in_between)(last_letter).
this is an input line
t2s is an i3t l2e
Someone had already come up with this:
and I considered it (for personal reasons) to be a personal matter. It took me a while (some minutes, I mean), but I finally came up with:
Any other suggestion?