構造体の作り方

レコード、構造体は無名ハッシュで作ると楽
$r = {
   name   => "marble",
   age    => 10,
   weight => 10,
};

メンバーへのアクセス
$r->{name}
$r->{age}

コピー
$copy_of_r = {%$r};
注: これはshallowコピー。