[SPV]

1. Аты вставляй переносы сразу при считывании из файла:
open(DATA,"content.dat");
$cont= join('<br>',<DATA>);
close(DATA);
print $cont;

2. Не забывай пустую строку, разделяющую заголовок письма от содержимого. И не мешает указать тип содержимого:
print SENDMAIL <<"EOF";
From: <$your_email>
To: <$email>
Subject: $subject
Content-type: text/html

@cont
EOF