Catalystのソースを見ていたら二項演算子スライスを使ってハッシュの初期化をしていた - kopug memo
Catalyst::Dispatcherを見ていたら二項演算子(Multiplicative Operators)スライスを使ったハッシュの初期化をみつけた。 @{ $self->registered_dispatch_types }{@classes} = (1) x @classes; で、これを分かりやすく変えると下記のようになります。 use Data::Dumper; my @keys = qw( a b c ); my %hash; @hash{ @keys } = (1) x @keys; print Dumper \%hash; $VAR1 = { 'c' => 1, 'a' => 1, 'b' => 1 }; 要は配列をハッシュのキーにして、値は1だよと。 良く判定系の処理をするときに、配列をぐるぐる回して一致するか？とかやりたくないので、 一度ハッシュに突っ込んでから、
log4ZIGOROu : JSON::DWIW vs JSON::Syck vs JSON
最近CPANにJSON::DWIWというJSON parserがリリースされて居ました。 このモジュールのPODにはBenchmarkの結果があり、JSON, JSON::Syckとのベンチ結果が載っていますが、なんとJSON::Syckより速いとの結果が出ています！ ちょっと気になったので自分でもベンチマークを取ってみました。 ソース 下記のような感じです。 #!/usr/bin/perl use strict; use warnings; use Benchmark; use Data::Dump qw/dump/; use File::Slurp; use JSON qw(); use JSON::Syck; use JSON::DWIW; our $json_file = $ARGV[0]; die("not json file") unless ($json_file && -e
1
リリース、障害情報などのサービスのお知らせ
最新の人気エントリーの配信
処理を実行中です
j次のブックマーク
k前のブックマーク
lあとで読む
eコメント一覧を開く
oページを開く
