perl - Perl Mime::Lite 配列デリファレンスのハッシュ

Question

msg->attach()の関数で逆参照しているハッシュの配列がありMime::Liteます。コードは次のとおりです。

for my $href (@$aref){
    $msg->attach(
            Type     => 'text',
            Data     => "productype: $href->{prodtype}   product: $href->{product}    qbs_id:$href->{qbs_id}\n";
    );
}

上記の例の構文エラーを示します。これがループに入れる正しい方法なmsg->attach()のか、それともループを維持できないのか教えてください。ありがとうございました。

Answer 1

の引数リスト内ではattach、セミコロンは使用できません;。コンマ,を使用して引数を区切ります。

for my $href (@$aref) {
    $msg->attach(
        Type => 'text',
        Data => "productype: $href->{prodtype}   product: $href->{product}    qbs_id:$href->{qbs_id}\n",
    );
}

末尾のコンマも省略できますが、それはスタイルが悪いと思います。