perldoc -q comma

answers this question in How can I output numbers with commas added?

-bn