変数を初期化する

変数を利用するには変数を宣言したあとで変数に値を格納しますが、変数の宣言を行うと同時に変数に対して初期値を格納することができます。ここでは Perl で変数を初期化する方法について解説します。

(Last modified: 2023年04月04日)

変数を初期化する

今までは変数を宣言した後で変数に値を格納していましたが、変数の宣言を行うと同時に初期値を格納することができます。次の書式を使います。

my $変数名 = 初期値;

これは次のように記述した場合と同じです。

my $変数名;
$変数名 = 初期値;

宣言と同時に値を格納することで、値が格納されていない変数を使用するミスを未然に防ぐことができます。

複数の変数をまとめて初期化する

複数の変数をまとめて宣言する場合は次のように記述することができました。

my ($変数名1, $変数名2, ...);

複数の変数をまとめて宣言しつつ初期化も行う場合は次のように記述します。

my ($変数名1, $変数名2, ...) = (初期値1, 初期値2, ...);

これは次のように記述した場合と同じです。

my $変数名1;
my $変数名2;

$変数名1 = 初期値1;
$変数名2 = 初期値2;

それでは簡単なサンプルを作成します。

use strict;
use warnings;
use utf8;
binmode STDIN, ':encoding(cp932)';
binmode STDOUT, ':encoding(cp932)';
binmode STDERR, ':encoding(cp932)';

my $str = "Hello\n";
print $str."\n";

my ($str1, $str2) = ("Blue", "Red");
print $str1."\n";
print $str2."\n";

テキストエディタでプログラムを記述したあと sample.pl という名前で保存します。(文字コードは UTF-8 です)。コマンドプロンプトを起動し、プログラムを保存したディレクトリへ移動したあとで次のように実行します。

perl sample.pl

次のように実行結果が表示されます。

変数を宣言すると同時に初期化を行いました。また複数の変数に対してまとめて初期化を行いました。

-- --

Perl で変数を初期化する方法について解説しました。

著者 / TATSUO IKURA

プログラミングや開発環境構築の解説サイトを運営しています。