foreach $image (@htmlimages) {
	$msg->attach(
		Type => 'image/gif',
		Id   => $image,
		Path => "./$image"
	);
}

##</code><code>##

$msg->close(Type => multipart/related);