Date: Sunday December 01, 2019 @ 05:18 Author: argrath Update of /cvsroot/perldocjp/docs/modules/base-2.14 In directory sf-cvs:/tmp/cvs-serv67110/modules/base-2.14 Modified Files: base.pod Log Message: base-2.14/base =================================================================== File: base.pod Status: Up-to-date Working revision: 1.2 Sat Nov 30 20:18:07 2019 Repository revision: 1.2 /cvsroot/perldocjp/docs/modules/base-2.14/base.pod,v Sticky Options: -ko Existing Tags: No Tags Exist -------------- next part -------------- Index: docs/modules/base-2.14/base.pod diff -u docs/modules/base-2.14/base.pod:1.1 docs/modules/base-2.14/base.pod:1.2 --- docs/modules/base-2.14/base.pod:1.1 Fri Sep 9 04:45:54 2011 +++ docs/modules/base-2.14/base.pod Sun Dec 1 05:18:07 2019 @@ -25,9 +25,8 @@ =end original -Unless you are using the C<fields> pragma, consider this module discouraged -in favor of the lighter-weight C<parent>. -(TBT) +C<fields> ¥×¥é¥°¥Þ¤ò»È¤Ã¤Æ¤¤¤ë¤Î¤Ç¤Ê¤¤¸Â¤ê¡¢¤³¤Î¥â¥¸¥å¡¼¥ë¤ÏÈó¿ä¾©¤Ç¤¹; +Âå¤ï¤ê¤Ë·ÚÎÌ¤Ê C<parent> ¤ò»È¤Ã¤Æ¤¯¤À¤µ¤¤¡£ =begin original @@ -36,9 +35,9 @@ =end original -Allows you to both load one or more modules, while setting up inheritance from -those modules at the same time. Roughly similar in effect to -(TBT) +°ì¤Ä¤Þ¤¿¤ÏÊ£¿ô¤Î¥â¥¸¥å¡¼¥ë¤òÆɤ߹þ¤ó¤Ç¡¢¤½¤ì¤é¤Î¥â¥¸¥å¡¼¥ë¤«¤é·Ñ¾µ¤¹¤ë¤Î¤ò +Ʊ»þ¤Ë¹Ô¤¤¤Þ¤¹¡£ +¤ª¤ª¤è¤½¼¡¤Î¤è¤¦¤Ê¸ú²Ì¤¬¤¢¤ê¤Þ¤¹: package Baz; BEGIN { @@ -58,13 +57,13 @@ =end original -C<base> employs some heuristics to determine if a module has already been -loaded, if it has it doesn't try again. If C<base> tries to C<require> the -module it will not die if it cannot find the module's file, but will die on any -other error. After all this, should your base class be empty, containing no -symbols, it will die. This is useful for inheriting from classes in the same -file as yourself, like so: -(TBT) +¥â¥¸¥å¡¼¥ë¤¬´û¤ËÆɤ߹þ¤Þ¤ì¤Æ¤¤¤ë¾ì¹ç¡¢ºÆ¤Ó¹Ô¤ï¤Ê¤¤¤è¤¦¤Ë¤¹¤ë¤¿¤á¤Ë +C<base> ¤ÏÀë¸À¤Ë·Ð¸³Â§¤òÍѤ¤¤Þ¤¹¡£ +C<base> ¤¬¥â¥¸¥å¡¼¥ë¤ò C<require> ¤·¤è¤¦¤È¤·¤¿¤È¤¡¢¥â¥¸¥å¡¼¥ë¤Î¥Õ¥¡¥¤¥ë¤¬ +¸«¤Ä¤«¤é¤Ê¤¯¤Æ¤â die ¤·¤Þ¤»¤ó¡£ +¤·¤«¤·¤½¤Î¾¤Î¥¨¥é¡¼¤Ç¤Ï die ¤·¤Þ¤¹¡£ +¤³¤ì¤éÁ´¤Æ¤Î¸å¡¢´ðÄ쥯¥é¥¹¤¬¶õ¤Ç¡¢¥·¥ó¥Ü¥ë¤ò´Þ¤ó¤Ç¤¤¤Ê¤¤¾ì¹ç¡¢die ¤·¤Þ¤¹¡£ +¤³¤ì¤Ï¼¡¤Î¤è¤¦¤Ë¡¢¼«Ê¬¼«¿È¤ÇƱ¤¸¥Õ¥¡¥¤¥ë¤Î¥¯¥é¥¹¤«¤é·Ñ¾µ¤¹¤ë¤Î¤ËÍÍѤǤ¹: package Foo; sub exclaim { "I can have such a thing?!" } @@ -79,9 +78,9 @@ =end original -If $VERSION is not detected even after loading it, <base> will define $VERSION -in the base package, setting it to the string C<-1, set by base.pm>. -(TBT) +¥í¡¼¥É¤Î¸å¤Ç¤â $VERSION ¤¬¸¡½Ð¤µ¤ì¤Ê¤«¤Ã¤¿¾ì¹ç¡¢ +<base> ¤Ï´ðÄì¥Ñ¥Ã¥±¡¼¥¸¤Ç $VERSION ¤òÄêµÁ¤·¡¢Ê¸»úÎó +C<-1, set by base.pm> ¤òÀßÄꤷ¤Þ¤¹¡£ =begin original @@ -92,11 +91,11 @@ =end original -C<base> will also initialize the fields if one of the base classes has it. -Multiple inheritance of fields is B<NOT> supported, if two or more base classes -each have inheritable fields the 'base' pragma will croak. See L<fields>, -L<public> and L<protected> for a description of this feature. -(TBT) +C<base> ¤Ï¤Þ¤¿¡¢´ðÄ쥯¥é¥¹¤Î¤¤¤º¤ì¤«¤¬»ý¤Ã¤Æ¤¤¤ë¥Õ¥£¡¼¥ë¥É¤ò½é´ü²½¤·¤Þ¤¹¡£ +¿½Å·Ñ¾µ¤ÏÂбþ¤·¤Æ B<¤¤¤Þ¤»¤ó>; Ê£¿ô¤Î´ðÄ쥯¥é¥¹¤¬¤½¤ì¤¾¤ì·Ñ¾µ²Äǽ¤Ê +¥Õ¥£¡¼¥ë¥É¤ò»ý¤Ã¤Æ¤¤¤ë¾ì¹ç¡¢'base' ¥×¥é¥°¥Þ¤Ï croak ¤·¤Þ¤¹¡£ +¤³¤Îµ¡Ç½¤ÎÀâÌÀ¤Ë¤Ä¤¤¤Æ¤Ï L<fields>, L<public>, L<protected> ¤ò +»²¾È¤·¤Æ¤¯¤À¤µ¤¤¡£ =begin original @@ -121,9 +120,8 @@ =end original -base.pm was unable to require the base package, because it was not -found in your path. -(TBT) +¥Ñ¥¹¤Ë¸«¤Ä¤«¤é¤Ê¤«¤Ã¤¿¤Î¤Ç¡¢base.pm ¤Ï´ðÄì¥Ñ¥Ã¥±¡¼¥¸¤ò +require ¤Ç¤¤Þ¤»¤ó¤Ç¤·¤¿¡£ =item Class 'Foo' tried to inherit from itself @@ -167,5 +165,12 @@ L<fields> +=begin meta + +Translate: SHIRAKATA Kentaro <argra****@ub32*****> +Status: completed + +=end meta + =cut