в какие теги брать картинку при отправки почты на mail

написал скрипт отправки почты на perl

какие теги нужно брать url картинки чтоб на почту пришла картинка а не просто отображался текст тегов и урла картинки пытался так

Code:

$msg .= '<img src="http://Картинка/images/1271510214_3.jpg" alt="image">'; 

но приходит текстовая ссылка картинка не отображается

i

Code:

f (defined(param("send"))){
	my ($header, $msg);
	my $pattern = qr/^([a-z0-9_\.\-]+)\@(([a-z0-9\-]+\.)+[a-z]{2,4})$/;
	$msg  = "Добрый день!\n\n";
	$msg .= "Новости нашего сайта.\n\n";
        $msg .= ' КАРТИНКА ';
	$msg .= "http://сайт//\n";
	$msg .= "mail\@site.ru";
	sysopen(FILE, 'mail.txt', O_RDONLY) or die ("Ошибка $!");
	flock(FILE,LOCK_EX) or die ("Ошибка $!");

 

вариант вывода на CGI:

Code:

#! C:/Perl/bin/perl.exe
use CGI qw(:all);

sub display_image
{
 my($image) = @_;
 open(IMG,$image);
 binmode(STDOUT); binmode(IMG);
 print <IMG>;
 close(IMG);
}

$imgdir = "C:/Coca Cola";
opendir(IMGS,$imgdir);

@imgs = grep(/\.jpg$/,readdir(IMGS));
closedir(IMGS);

print header (-type => 'image/jpeg');

 $i = $imgdir."/".$imgs[rand($#imgs+1)];
 display_image($i);