#!/usr/bin/perl -w   # note: -w
use strict;          # note: strictness
use MIME::Lite;      # note: ends with ;
my $msg = MIME::Lite->new(    # note: ->new(
  From=>'some@email',
  To=>'some@email',
  Subject=>'SUBJECT OF MESSAGE',
  Type=>'TEXT',
  Data=>"THIS IS THE MESSAGE"
);  # do not forget this
$msg->send("smtp","smtp.something.addr"); # note: small letters
                                          # and smtp server