use Time::localtime;
use POSIX qw(locale_h);
[...]
POSIX::localtime();
localtime() # package Time::localtime