File Coverage

blib/lib/Net/Async/SMTP.pm

Criterion	Covered	Total	%
statement	6	6	100.0
branch			n/a
condition			n/a
subroutine	2	2	100.0
pod			n/a
total	8	8	100.0

package Net::Async::SMTP;
# ABSTRACT: SMTP support for IO::Async
use strict;
use warnings;

our $VERSION = '0.004';

=head1 NAME

Net::Async::SMTP - email sending with IO::Async

=head1 SYNOPSIS

 #!/usr/bin/env perl
 use strict;
 use warnings;
 use IO::Async::Loop;
 use Net::Async::SMTP::Client;
 use Email::Simple;
 my $email = Email::Simple->create(
 	header => [
 		From    => '[e-mail]',
 		To      => '[e-mail]',
 		Subject => 'NaSMTP test',
 	],
 	attributes => {
 		encoding => "8bitmime",
 		charset  => "UTF-8",
 	},
 	body_str => '... text ...',
 );
 my $loop = IO::Async::Loop->new;
 $loop->add(
 	my $smtp = Net::Async::SMTP::Client->new(
 		domain => 'example.com',
 	)
 );
 $smtp->connected->then(sub {
 	$smtp->login(
 		user => '...',
 		pass => '...',
 	)
 })->then(sub {
 	$smtp->send(
 		to   => '[e-mail]',
 		from => '[e-mail]',
 		data => $email->as_string,
 	)
 })->get;

=head1 DESCRIPTION

Provides basic email sending capability for L, using
the L implementation.

See L for a list of supported features
and usage instructions.

This class does nothing - use L for
sending email.

=cut

1;

__END__