Yes, they are equivalent, and it works with Net::SMTP. just $var = <<EOF; works fine

$message = <<EOF;
To : user
Subject : Test

foo
bar
baz
EOF

$smtp->datasend($message);
[download]