use locale;
use POSIX 'locale_h';
my $loc = 'de_DE.utf8';  # German locale, for example. Run 'locale -a' to get the exact locale name
setlocale(LC_CTYPE, $loc)
  or die "Invalid locale $loc";