Skip to content
Fetching contributors…
Cannot retrieve contributors at this time
13 lines (9 sloc) 441 Bytes
use Test::More tests => 12;
use strict;
use lib 't';
use_ok('Test::Qpsmtpd');
ok(my ($smtpd, $conn) = Test::Qpsmtpd->new_conn(), "get new connection");
is(($smtpd->command('HELO localhost'))[0], 250, 'HELO localhost');
is(($smtpd->command('EHLO localhost'))[0], 503, 'EHLO localhost (duplicate!)');
ok(($smtpd, $conn) = Test::Qpsmtpd->new_conn(), "get new connection");
is(($smtpd->command('EHLO localhost'))[0], 250, 'EHLO localhost');
Jump to Line
Something went wrong with that request. Please try again.