$parts{$part}{des} = {} unless exists $parts{$part}{des};
  my %des = %{ $parts{$part}{des} };
  @des{@des} = ();
  %{ $parts{$part}{des} } = %des;

##</code><code>##

    @{ $parts{ $part }{ des } }{ @des } = ();