my %xmlData;
$xmlData{'Date'}='2018-10-15';
$xmlData{'Time'}='18:20:00';
$xmlData{'Depot'}{'Account'}{'Consignment'}{'Type'}           = 'D';
$xmlData{'Depot'}{'Account'}{'Consignment'}{'ImportID'}       = '123;
$xmlData{'Depot'}{'Account'}{'Consignment'}{'Reference'}      = 'RefNo';
$xmlData{'Depot'}{'Account'}{'Consignment'}{'Number'}         = 'ShipNo';
$xmlData{'Depot'}{'Account'}{'Consignment'}{'Lifts'}          = '3';
$xmlData{'Depot'}{'Account'}{'Consignment'}{'Weight'}         = '1800';
$xmlData{'Depot'}{'Account'}{'Consignment'}{'ManifestNote'}   = 'Freight to load';
$xmlData{'Depot'}{'Account'}{'Consignment'}{'CollectionDate'} = '2018-10-15';
$xmlData{'Depot'}{'Account'}{'Consignment'}{'DeliveryDate'}   = '2018-10-17';
$xmlData{'Depot'}{'Account'}{'Consignment'}{'DeliveryTime'}   = '15:00:00';
[...] Code between [...]
$xmlData{'Depot'}{'Account'}{'Consignment'}{'Pallet'}='PID_987654';
$xmlData{'Depot'}{'Account'}{'Consignment'}{'BillUnit'}{'Type'}='QP'?
$xmlData{'Depot'}{'Account'}{'Consignment'}{'BillUnit'}{'Amount'}='3';

##</code><code>##

my $xml = new XML::Simple;
my $xmlout = $xml -> XMLout(\%xmlData, NoAttr => 1, RootName => 'Manifest', KeyAttr => 'Account', NoSort => 1, SuppressEmpty => undef );
$xmlout = '<?xml version="1.0" encoding="UTF-8"?>'."\n".$xmlout;

##</code><code>##

<?xml version="1.0" encoding="UTF-8"?>
<Manifest>
  <Depot>
    <name>Account</name>
    <Consignment>
      <Address>
        <Town>[...]</Town>
        <Type>[...]</Type>
        <Line>[...]</Line>
        <Country>[...]</Country>
        <County>[...]</County>
        <CompanyName>[...]</CompanyName>
        <ContactName>[...]</ContactName>
        <PostCode>[...]</PostCode>
        <Telephone>[...]</Telephone>
      </Address>
      <Address>
        <CompanyName>[...]</CompanyName>
        <PostCode>[...]</PostCode>
        <Town>[...]</Town>
        <Country>[...]</Country>
        <Type>[...]</Type>
        <Line>[...]</Line>
      </Address>
      <Lifts>[...]</Lifts>
      <Number>[...]</Number>
      <CollectionDate>[...]</CollectionDate>
      <Pallet>[...]</Pallet>
      <Reference>[...]</Reference>
      <BillUnit>
        <Type>[...]</Type>
        <Amount>[...]</Amount>
      </BillUnit>
      <Service>
        <ServiceGroupCode>[...]</ServiceGroupCode>
        <ServiceCode>[...]</ServiceCode>
        <Type>[...]</Type>
      </Service>
      <Weight>[...]</Weight>
      <DeliveryDate>[...]</DeliveryDate>
      <ImportID>[...]</ImportID>
      <ManifestNote>[...]</ManifestNote>
      <Type>[...]</Type>
      <DeliveryTime>[...]</DeliveryTime>
    </Consignment>
  </Depot>
  <Date>[...]</Date>
  <Time>[...]</Time>
</Manifest>