use strict;
use warnings;
use Locale::gettext;
use POSIX;

setlocale(LC_MESSAGES, "it_IT");

my $d = Locale::gettext->domain('license');
$d->dir('/home/sini/');
print $d->get("Hello world")."\n";