...

$msg->attach(
 Type =>'image/gif',
 Path =>'/tmp/image1.gif',
 Disposition => 'attachment'
);

my $part = MIME::Lite->new(
 Path => '/foo/image2.gif'
);

$part->attr('Content-Type' => 'image/gif');
$msg->attach($part);

...