package EmojiMail; use strict; use warnings; use MIME::Lite; use MIME::Base64 (); use Mail::Address::MobileJp; use Encode; use Unicode::Transform (); use YAML::Syck; sub new { my ($class, $opt) = @_; my $self = bless { from => $opt->{from}, to => $opt->{to}, subject => $opt->{subject}, body => $opt->{body}, }, $class; $self->{emoji_map} = YAML::Syck::LoadFile($opt->{emoji_map}); $self->build; retu
{{#tags}}- {{label}}
{{/tags}}