The Perl Toolchain Summit needs more sponsors. If your company depends on Perl, please support this very important event.

package Email::Send::OK;

use Test::More;

use strict;

sub is_available { 1 }

sub send {
  ok(1, "send message $_[0]");
}

1;