質問をすることでしか得られない、回答やアドバイスがある。

15分調べてもわからないことは、質問しよう!

ただいまの
回答率

90.45%

  • Perl

    504questions

    Perlは多目的に使用される実用性が高い動的プログラミング言語のひとつです。

三項演算子の挙動についてお教えください

解決済

回答 2

投稿 編集

  • 評価
  • クリップ 1
  • VIEW 784

circus55

score 58

use strict;
use warnings;

my %hash = ('1'=>10, '3'=>9, '5'=>8, '7'=>7, '9'=>6);
my ($one, $other) = (0, 0);

for my $k (sort { $b cmp $a } keys %hash) {
    ($k ne '1') ? $other += $hash{$k} : $one = $hash{$k};
}

print $one, " と ", $other;

上記のようなコードの時、
感覚的には、「10と30」のように表示してほしいのですが、
どうしてか、「10と9」と表示されます。

#($k ne '1') ? $other += $hash{$k} : $one = $hash{$k};
if ($k ne '1') {
    $other += $hash{$k};
} else {
    $one = $hash{$k};
}
三項演算子の部分を、上記のように変更すると期待通りの結果が表示されるのですが、
今ひとつ理解に苦しんでいます・・・

初歩的な質問ですが、三項演算子でなぜ「10と30」とならないのかお教えください。
perlのバージョンは、5.18.2です。
よろしくお願いします。
  • 気になる質問をクリップする

    クリップした質問は、後からいつでもマイページで確認できます。

    またクリップした質問に回答があった際、通知やメールを受け取ることができます。

    クリップを取り消します

  • 良い質問の評価を上げる

    以下のような質問は評価を上げましょう

    • 質問内容が明確
    • 自分も答えを知りたい
    • 質問者以外のユーザにも役立つ

    評価が高い質問は、TOPページの「注目」タブのフィードに表示されやすくなります。

    質問の評価を上げたことを取り消します

  • 評価を下げられる数の上限に達しました

    評価を下げることができません

    • 1日5回まで評価を下げられます
    • 1日に1ユーザに対して2回まで評価を下げられます

    質問の評価を下げる

    teratailでは下記のような質問を「具体的に困っていることがない質問」、「サイトポリシーに違反する質問」と定義し、推奨していません。

    • プログラミングに関係のない質問
    • やってほしいことだけを記載した丸投げの質問
    • 問題・課題が含まれていない質問
    • 意図的に内容が抹消された質問
    • 広告と受け取られるような投稿

    評価が下がると、TOPページの「アクティブ」「注目」タブのフィードに表示されにくくなります。

    質問の評価を下げたことを取り消します

    この機能は開放されていません

    評価を下げる条件を満たしてません

    評価を下げる理由を選択してください

    詳細な説明はこちら

    上記に当てはまらず、質問内容が明確になっていない質問には「情報の追加・修正依頼」機能からコメントをしてください。

    質問の評価を下げる機能の利用条件

    この機能を利用するためには、以下の事項を行う必要があります。

回答 2

checkベストアンサー

0

こうすれば上手くいくと思います。(v5.18.2で確認) 

($k ne '1') ? ( $other += $hash{$k} ) : ( $one = $hash{$k} );

うまく説明できないのですが、Perlの場合は「コンテキスト」(文脈)と演算子の優先順位の関係でこうなるようです。
詳しくは、下記リンク先の条件演算子の項を参照してください。


参考リンク:
perlop - Perl の演算子と優先順位 - perldoc.jp

投稿

  • 回答の評価を上げる

    以下のような回答は評価を上げましょう

    • 正しい回答
    • わかりやすい回答
    • ためになる回答

    評価が高い回答ほどページの上位に表示されます。

  • 回答の評価を下げる

    下記のような回答は推奨されていません。

    • 間違っている回答
    • 質問の回答になっていない投稿
    • スパムや攻撃的な表現を用いた投稿

    評価を下げる際はその理由を明確に伝え、適切な回答に修正してもらいましょう。

  • 2015/07/30 23:17

    教えていただいたリンク先のページで、どう式の解釈がされるのか理解しました。
    ありがとうございました

    キャンセル

0

うーんこれはPerl関係ないかと思います。
PHPでもJavascriptでも考え方は同じです。

A ? B : C

上記三項演算子は、「Aが正(成立する)ならばBを実行、偽(成立しない)ならばCを実行」となります。
これをif文にすると、
if (A) {
  B
} else {
  C
}
となります。

…と、ここまでこれば大体お分かりかと思いますが、三項演算子とIF構文でCの式が違うために得られる結果が違うのではないでしょうか。

投稿

  • 回答の評価を上げる

    以下のような回答は評価を上げましょう

    • 正しい回答
    • わかりやすい回答
    • ためになる回答

    評価が高い回答ほどページの上位に表示されます。

  • 回答の評価を下げる

    下記のような回答は推奨されていません。

    • 間違っている回答
    • 質問の回答になっていない投稿
    • スパムや攻撃的な表現を用いた投稿

    評価を下げる際はその理由を明確に伝え、適切な回答に修正してもらいましょう。

  • 2015/07/30 23:03

    すみません、質問のコードの変数名が間違っていました・・・
    修正しました。

    三項演算子でもif分でも、Cの式は同じ式なのに結果が違うのです・・・
    三項演算子の場合とif文の場合、式が変わってしまうのでしょうか?
    その場合、どのような式で解釈されてしまうのでしょうか・・・?

    キャンセル

  • 2015/07/30 23:18

    おお…そうでしたか(汗
    既に回答が出ておりますが、Perlは演算子の優先順位についてちょっと毛色が違うようですね。私も勉強になりました。

    キャンセル

  • 2015/07/30 23:23

    確認が足らず、いらぬ混乱を出しました、すみませんでした
    ありがとうございました

    キャンセル

15分調べてもわからないことは、teratailで質問しよう!

  • ただいまの回答率 90.45%
  • 質問をまとめることで、思考を整理して素早く解決
  • テンプレート機能で、簡単に質問をまとめられる

同じタグがついた質問を見る

  • Perl

    504questions

    Perlは多目的に使用される実用性が高い動的プログラミング言語のひとつです。