in reply to Patterns for your numbers

Take a read at this entry in perlfaq4.