in reply to
matching USD amounts
This should fulfill your requirements and enforce the 100,000 max.
/^\$(?:100,?000(?:\.00)?|\d{1,2},?\d{3}(?:\.\d\d)?)$/
[download]
Comment on
Re: matching USD amounts
Download
Code
In Section
Seekers of Perl Wisdom