select $mailer;

##</code><code>##

my $mailer = new Mail::Mailer 'smtp', 'relay.foo.com';
$mailer->open({
    To      => 'baz@foo.com',
    From    => 'foo@bar.com',
    Subject => 'Testing' });

select $mailer;
print "This is a test message.\n";

$mailer->close;