s/(\d{3})(?=\d)(?!\d*\.)/$1,/g;
tr/.,/,./;