use strict;
use warnings;
use threads;
use Scalar::Util 'reftype';
use Data::Dumper;
use CGI qw(:standard Vars);
use LWP::UserAgent;
use XML::Simple;