オブジェクト指向なモジュールの書き方を勉強したけど、忘れてた。 プログラミングPerlのコードをちょこっと変えたものを書いてみる。 モジュール package Person; use strict; #引数を受け取るコンストラクタ sub new { my $invocant = shift; my $self = b…

use strict; *PI = \3.141592; print $main::PI,"\n"; #上書きしようとするとエラー => 定数！ #our $PI = 1234; #print $PI,"\n";