use POSIX qw(setlocale locale_h LC_ALL);
setlocale(LC_NUMERIC, 'en_US.UTF-8');