プログラミング学習の記録 622.2 5章(リファレンスとスコープ)の練習問題1 『続・初めてのPerl 改訂版』(Randal L. Schwartz, brian d foy, Tom Phoenix 著、伊藤 直也、田中 慎司、吉川 英興 監訳、株式会社ロングテール／長尾 高弘 訳、オライリー・ジャパン、2006年、ISBN4-87311-305-9)

開発環境

• Mac OS X Snow Leopard (OS)
• TextWrangler(Text Editor) (いずれはBBEditを入手したい！)
• Script言語:Perl

『続・初めてのPerl 改訂版』(Randal L. Schwartz, brian d foy, Tom Phoenix 著、伊藤 直也、田中 慎司、吉川 英興 監訳、株式会社ロングテール／長尾 高弘 訳、オライリー・ジャパン、2006年、ISBN4-87311-305-9) の5章(リファレンスとスコープ), 5.9(練習問題)、1を解いてみる。

 

1.

passenger_1、passenger_2のどちらもハッシュ(%)なのに、その右辺はハッシュリファレンス({}で囲まれている。)、スカラーになっている。なので「{}」を「()」と書き換えればいい。

書き換えた後。

やり方の1つ。(「やり方は何通りもある」(TIMTOWTDI(There Is More Than One Way To Do It.)))

コード(TextWrangler)

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

my %passenger_1=(
  name=>"Ginger",
  age=>"22",
  occupation=>"Movie Star",
  real_age=>35,
  hat=>undef,
  );
my %passenger_2=(
  name=>"Mary Ann",
  age=>19,
  hat=>"bonnet",
  favorite_food=>"corn",
  );
my @passengers=(\%passenger_1,\%passenger_2);