m/
    \$
    (?:\d{1,3},?)+
    (?:\.\d{0,2})?
    (?![.\d])
/x