無名スカラー変数のリファレンス

my $array_ref = [qw/a b c/]; my $hash_ref = +{1 => 'a', 2 => 'b', 3 => 'c'}; my $code_ref = sub {'a'}; Perlでは、無名配列のリファレンス 無名ハッシュのリファレンス、無名サブルーチンのリファレンスはこのように書けますが、無名スカラーのリファレンスを書く特別な構文はないので、以下のように書きます。 my $scalar_ref = \do {'a'}; これはDamian Conway先生オススメのインサイドアウトオブジェクトのコンストラクタで見られる書き方です。 { package Person; my %props = (); sub new { my $class = shift; $prps{name} = 'John'; bless \do{''}, $class; } sub

[kiyo_hiko]

スレチぎみだが無名の配列Copy参照を作る場合「\」ではなく「[]」使えばいい模様。次のコードはゴルフ「my ＠xs = (3,1,4,1,5,9,2,6); my $copyOfXs = [do{my ＠ys=＠xs}]; $copyOfXs->[2] = 1; sub{print join(', ', ＠{$_[0]}), "\n"}->($_) for (\＠xs, $copyOfXs)

[hirafoo]

Data::Util

[fuba]

\do {'a'} とか \'a'

[lesamoureuses]

＞my $scalar_ref = \do {'a'};

[kits]

2日目とかぶっているような。/ \'a' は無名スカラーというか定数のリファレンスだと思う。