Select Code to Download

foreach $image (@htmlimages) {
    $msg->attach(
...
        Path => "./$image"
    );
}

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