Memo: Perl で連想配列?をぶんまわす方法
HTTP ヘッダやら MIME ヘッダというのは同じ名称のキーを持つ値をいくつかとり、ハッシュでデータ保持することができないので
my $headers = [
"Content-Type" => "text/plain",
"Set-Cookie" => "....",
"Set-Cookie" => "....",
];みたいなデータ構造にするのですが、これをうまいこと回す方法を知らなかったので教えてもらったのをメモってなかったのでメモ
Yappo: @cho45 while(my($k, $v) = splice @$array, 0, 2){} L:リナカフェkits_: @cho45 List::MoreUtils::natatimeで: my $it=natatime 2,@$array_ref;while(my($key, $val)=$it->()){}



