chomp $a;
$a =~ (m/\d{2,3}.\d{2,3}/) || $a =~ (m/\$\d{3}.\d\{2}/) || $a =~ (m/\$\.\d{2}/);