perlでハッシュとかのカッコの前に付いてるプラスの意味 - 新だるろぐ跡地
{}の前にプラスが付いて、+{}とかなってるのをよく見るけど、やっとこれの意味が分かったのでメモ。 このカッコはハッシュ以外にも使われるから、「これはハッシュリファレンスですよ」と明示するためのもの。 use strict; use warnings; use Data::Dumper; local $\ = "\n"; sub p { print Dumper shift; } sub hashref_ng { { @_ } } sub hashref_ok { +{ @_ } } my $ng = hashref_ng(1,2,3,4); my $ok = hashref_ok(1,2,3,4); p $ng; p $ok; 実行結果 % perl hashref.pl $VAR1 = 4; $VAR1 = { '1' => 2, '3' => 4 }; こんな常識も知らずにおりますよ
型グロブを理解する 〜アスタリスクは怖くないよ(｡･ω･)ﾉｼ〜 - (ﾟ∀ﾟ)o彡 sasata299's blog
2009年03月28日16:01 Perl 型グロブを理解する 〜アスタリスクは怖くないよ(｡･ω･)ﾉｼ〜 先日、tokuhiromさんの LWP::UserAgent::WithCache::Transparent を見ていて、 my $orignew = *LWP::UserAgent::new{CODE}; {CODE}って何だ！？と思ったので調べてみました。結論から言うと、これは型グロブです。まずは型グロブの簡単な説明から。 そもそもperlでは、（グローバルな）変数とか配列とかハッシュとかサブルーチンとかファイルハンドルなんかは全て一つのテーブル（シンボルテーブル）で管理されています。 ※レキシカル変数(my宣言する変数）はシンボルテーブルではなく、別テーブルで管理されています。 例えば、 #!/usr/bin/perl use strict; use warnings; ou
exists関数 - ハッシュのキーの存在確認 - Perl入門ゼミ
Perl › 関数 › here exists関数を使用するとハッシュのキーの存在を確認することができます。 # ハッシュのキーの存在確認 my $is_exists = exists $hash{$key}; ageというキーが存在するかを確認するには以下のようにします。 # ageというキーが存在することを確認 my %person = (name => 'Ken', age => 1); my $is_exists = exists $person{age}; ハッシュのリファレンスの場合には以下のようにすることができます。 # キーの存在確認。ハッシュのリファレンスの場合。 my $person = {name => 'Ken', age => 1}; my $is_exists = exists $person->{age}; defined関数との違い よく似た関数にdefin
SimpleBoxes | [perl]ハッシュ(連想配列)のマージ
perlのハッシュ(連想配列)のマージについてちょっと調べました。自分用のメモとして記録しておきます。 一番直観的な方法は以下のようなコードでしょう。 %hash = (%hash, %addition); ハッシュ %hash に対して、%addition の内容を追加します。 my %hash = ( 'key1' => 'value1', 'key2' => 'value2', ); my %addition = ( 'key3' => 'value3', 'key4' => 'value4', 'key1' => 'override1', ); %hash = (%hash, %addition); 上述のようなコードを実行すると、%hash の内容は以下のようになります。 'key1' => 'override1', 'key2' => 'value2', 'key3' => '
1
リリース、障害情報などのサービスのお知らせ
最新の人気エントリーの配信
処理を実行中です
j次のブックマーク
k前のブックマーク
lあとで読む
eコメント一覧を開く
oページを開く
