Perlでオブジェクトのクラス名を調べる方法
print ref $obj;オブジェクトのクラス名を調べるサンプルコード
use strict;
use CGI;
my $obj = CGI->new;
print ref $obj,"\n"; # => 'CGI'
カテゴリ:
Perl
print ref $obj;use strict;
use CGI;
my $obj = CGI->new;
print ref $obj,"\n"; # => 'CGI'