For starters, I think you saved the source code as UTF-8, but you told Perl it's encoded using iso-latin-1 (by omitting use utf8;).

But fixing that is probably not enough since I think datasend expects the data must be properly formatted for a MIME message and it isn't. You may prefer to use a module that operates at a higher level.