# original code (from mod_perl book)
   use POSIX;
   setlocale(LC_ALL, 'en_US');

   # now stop symbol exporting... (from mod_perl book)
   use POSIX(); # instead of use POSIX;
   POSIX::setlocal(&POSIX::LC_ALL, 'en_US');