【perl】変数を括弧でくくる意味

Question

こんなかんじの記述があったのですが、これはどういう意味があるのでしょうか？

my ($result) = API::request($params);

色々調べてみたのですが、説明がよくわからず困っています。
PHP/Java/JavaScriptのどれかに例えて頂けると助かります。

Answer 1

結果をリストコンテキストで受け取りたい、ということです。
しかも、戻ってきたリストの先頭要素しか必要ない、ということ。

他の言語で例えるのは無理かな？

Answer 2

複数の値を受け取るときに使います。
下記をコピペして試してみてください。

use strict;
use warnings;

sub method {
    my ( $s, $i ) = @_;
    print $s."\n";
    print $i."\n";

    my $a = "ok1";
    my $b = "ok2";
    my $c = "ok3";
    return ($a, $b, $c);
}

# 同じ数の変数で受け取る場合
my ( $a, $b, $c ) = method("test", 1);
print $a."\n";
print $b."\n";
print $c."\n";

# 1つの変数で受け取る場合
# メソッドのreturnで最も左のものが返る
my ( $d ) = method("test", 2);
print $d."\n"; 

# 括弧なしで1つの変数で受け取る場合
# メソッドのreturnで最も右のものが返る
my $e = method("test", 3);
print $e."\n";

PHP/Java/JavaScriptのどれかに例えて頂けると助かります。

複数の戻り値を返すという点で見てみると、次のようなことをやっています。
PHP：list()という言語構造。
Java：オブジェクトや専用のクラスを作成して返す。
Javascript：ES6の分割代入。

Comments

[tomoyuki123]

皆様ありがとうございます。大変わかりやすい説明ありがとうございました！

[maisumakun]

JavaScriptでも、ES6では「分割代入」というのが登場していて、「const [foo, bar] = some_func();」のように書けるようになっています。

[coba-coba]

maisumakunさんご指摘ありがとうございます。上記修正します。