Perl Mime :: Lite散列陣列derefrence

Question

我有一個散列數組，我在的msg->attach()函數中解除引用。代碼如下：

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", 
    ); 
} 

尾隨逗號，但我認爲不好的風格。