Hi,

(first best guess answer thrown away)

I looked at the problem a little bit deeper as I was interested in that domain knowing that I will stumble about that earlier or later.

Add the following snippet to your code:

my @parts = $entity->parts();
foreach my $part (@parts) {
    my $head = $part->head();
    print "Effective: " . $part->effective_type() . "\n";
    print "Content-Type from Header: " . $head->get('Content-Type') . 
+"\n";
}
[download]

and you will see that the original information is there. Why it isn't dumped with the method dump_skeleton is something different.

Best regards
McA