トップページ
⇒
tech
1001コメント
267KB
Perlについての質問箱 58箱目
全部
前100
次100
最新50
■ このスレッドは過去ログ倉庫に格納されています
0883
デフォルトの名無しさん
2013/07/19(金) NY:AN:NY.AN
use overload '""' => sub { shift->to_string };
sub to_string{
my $self = shift;
return "name: $self->{name}, weight: $self->{weight}";
}
全部
前100
次100
最新50
■ このスレッドは過去ログ倉庫に格納されています