for my $itemIndex (1..$items->Count) {
	my $body = $items->Item($itemIndex)->Body;
	$body =~ s/\s+<\//<\//g;
	$items->Item($itemIndex)->{'Body'} = $body;
	$items->Item($itemIndex)->Save;
}