if ( ($payment=~/^\s*\$?(\d{1,3},(\d{3},)*\d{3}|\d+)(\.\d{2})\s*$/) || ($payment > 99999.99) )
               {
		       
		print "^*$1-$2-$3-match*$payment*match*^<br>";
		
	}else{print "No match";}