¤É¤Î¥â¥¸¥å¡¼¥ë¤ò¥¨¥¯¥¹¥Ý¡¼¥È¤¹¤ë¤«¤ò¡¢´Êñ¤ËÀßÄê¤Ç¤¤ëÊØÍø¥â¥¸¥å¡¼¥ë
Moose¤Î¥µ¥Ö¥¯¥é¥¹¤òºî¤Ã¤Æ¤ß¤Þ¤¹¡£
package Tomyhero::Class; use Moose; use Moose::Exporter; Moose::Exporter->setup_import_methods( also => 'Moose', with_caller => ['__TOMYHERO__'], ); sub __TOMYHERO__ { my ( $caller, ) = @_; Moose::unimport; $caller->meta->make_immutable( inline_destructor => 1 ); 'Love Tomyhero'; } 1; package My::Class; use Tomyhero::Class; has 'sexy_name' => (is => 'rw', isa => 'Str'); __TOMYHERO__;
- ¥«¥Æ¥´¥ê¡§
- ³ØÌ䡦Íý·Ï
- Perl
¥¿¥°
¤³¤Î¥Ú¡¼¥¸¤Ø¤Î¥³¥á¥ó¥È
Moose::Exporter - Perl 5 �ޥ����� Wiki - Seesaa Wiki�ʥ������� for ���ޡ��ȥե��� モンクレール ダウン アウトレット http://www.pslcbi.com/moncler2014.html