#- часть кода из даемона

my $data = '';
my $rv   = $client->recv($data, POSIX::BUFSIZ, 0);  #Читаем данные 

#- данные я отправляю в xml  например строку
#-<a><con><comanda>start</comanda></con></a>

#- данные приходят все нормально только я пытаюсь #-эту строку разбить на хэш  но даемон сразу 
#-останавливается

my $lic = (XML::Simple->new()->XMLin($data));

my $data = '<a><con><comanda>start</comanda></con></a>';
my $lic = (XML::Simple->new()->XMLin($data));