初めてまじめにさわった言語はJavaだったもんで、Perlのような軽いタッチ(?)の言語になじめません。 とりあえず、こんな書き方ありなんだーってのをメモしてます。 (人に見せるもんじゃないですね)
#!/usr/bin/perl -w //mainパッケージの宣言 package main; $bar = '$bar is in main package'; { //これによって、この括弧内はhogeパッケージとなる? package hoge; $bar = '$bar is in hoge spackage'; print $bar, "\n"; <-自分のパッケージ内の変数へのアクセス print $hoge::bar,"\n"; これと同じ意味。 print $hoo::bar,"\n"; <- これはエラーになっちゃう } { package hoo; $bar = '$bar is in hoo package'; print $bar, "\n"; print $hoge::bar,"\n"; <-これはエラーにならない } print $bar ,"\n"; <-これはmainパッケージのbarへのアクセス
#!/usr/bin/perl -w package hoge; { $bar = '$bar is in hoge spackage'; print $hoge::bar,"\n"; }
#!/usr/bin/perl -w package hoge; { $bar = '$bar is in hoge spackage'; print $hoge::bar, "\n"; sub new { my $pkg = shift; my $hash = { name => shift, weight => shift }; bless $hash, $pkg; } }
この記事は
現在のアクセス:5513