A simple way? A Perl way?

[Jerry Preston]

Hi!

I am looking for a simple Perl way to decode the following, which can be any
grouping of number 

   2-8,9,11,18-21

Into
   2,3,4,5,6,7,8,9,11,18,19,20,21

Any Ideas?

Thanks for Your Time and Help,

Jerry