XML::Twig is obviously dieing, so wrap this:

my $statusTwig = new XML::Twig(twig_roots => {'Result/Status' => $stat
+usCallback }, ProtocolEncoding=>"x-sjis-unicode");
[download]

in an eval{ } and then see what error $@ you get would be my next step.

jdtoronto