Can't work out why this is not sending me an email

#!/usr/bin/perl -wT

use Net::SMTP;
    
$smtp = Net::SMTP->new('mailservername.net',
                         Debug   => 1,
                         );
$smtp->mail('peter@mydomain.com');
$smtp->to("peter\@home.emailaddress.com");
$smtp->data();
$smtp->datasend("To: Peter\n");
$smtp->datasend("\n");
$smtp->datasend("test send\n");
$smtp->dataend();    
$smtp->quit;
[download]

There are no error messages, and no email received, yet when I used the "NMS" FormMail.pl on the same domain (my feedback form), I got an email in one minute. Any method to debug this ? We have Perl 5.006001 if that makes a difference.

Peter