it's in the camel book somewhere.... 1 while $x =~ s!(.*\d)(\d{3})!$1,$2!; cheers. ================================================================ Ezra Pagel Software Engineer Perl/Java/Oracle ezra at jdba.org Austin Logistics, Inc. epagel at austinlogistics.com Austin, Texas (512)-651-5644