my $body = $items->Item($itemIndex)->Body;

##</code><code>##

$items->Item($itemIndex)->{'Body'} = $body;

##</code><code>##

$items->Item($itemIndex)->Body = $body;