Mojo::JSON::decode()には、デコードされていない文字列を渡す。 返ってくる値は、デコードされた状態になる。 Mojo::JSON::encode()には、デコードされている状態の値を渡す。 返ってくるJSON文字列は、デコードされていない状態になる。 つまり、Mojo::JSO…

以下の様な感じ。 # メールをパース my $mail = Email::MIME::MobileJP::Parser->new($mail_str); my %headers = @{ $mail->mail->{header}->{headers} };

Email::Senderでメール送信しているアプリをテストするときは以下の様な感じで行う。 use Test::More; use Encode; # 環境変数を設定 BEGIN { $ENV{EMAIL_SENDER_TRANSPORT} = 'Test' } use YourCode; YourCode->run; my @deliveries = Email::Sender::Simpl…