燈明ブログ

現状は小池啓仁の応援ブログ

wantarrayとは

すぐわかる オブジェクト指向 Perl
以下を読んでいて、ハッシュのスライスは知っていたのですが、wantarrayは知りませんでした。

なので調べてみました。


wantarrayとは、共通関数の一つで、実行中のサブルーチンの戻り値に、リストを要求される場合には真を返し、スカラーを要求される場合には偽を返す。

#!/usr/bin/perl
use strict;
use warnings;

my @foo = hoge();
print @foo, "\n"; # 配列要素

my $foo = hoge();
print $foo, "\n"; # 配列要素数

sub hoge {
    my @array = ('AAA', 'BBB', 'CCC');
    return wantarray ? @array : $#array;
}