#!/usr/bin/perl
use strict;
use warnings;
use Net::SMTP;
my $from = 'finalbsd@gmail.com';
my $smtp = Net::SMTP->new('192.168.1.2',
                          Hello => 'test.example.com'...