$ perl -e " use POSIX qw/ setlocale LC_ALL /; print setlocale( LC_ALL , undef ); "
English_United States.1252