=head1 NAME

UNIVERSAL - base class for ALL classes (blessed references)
J<< ja; UNIVERSAL - 全てのクラス(ブレスされたリファレンス)の基底クラス >>

=head1 SYNOPSIS

    $is_io    = $fd->isa("IO::Handle");
    $is_io    = Class->isa("IO::Handle");

    $does_log = $obj->DOES("Logger");
    $does_log = Class->DOES("Logger");

    $sub      = $obj->can("print");
    $sub      = Class->can("print");

    $sub      = eval { $ref->can("fandango") };
    $ver      = $obj->VERSION;

    # but never do this!
    $is_io    = UNIVERSAL::isa($fd, "IO::Handle");
    $sub      = UNIVERSAL::can($obj, "print");

=head1 DESCRIPTION

C<UNIVERSAL> is the base class from which all blessed references inherit.
See L<perlobj>.
J<< ja;
C<UNIVERSAL> は全てのブレスされたリファレンスが継承する基底クラスです,
L<perlobj> も参照してください. 
>>

C<UNIVERSAL> provides the following methods:
J<< ja;
C<UNIVERSAL> は以下のメソッドを提供しています:
>>

=over 4

=item C<< $obj->isa( TYPE ) >>

=item C<< CLASS->isa( TYPE ) >>

=item C<< eval { VAL->isa( TYPE ) } >>

Where
J<< ja;
ここで
>>

=over 4

=item C<TYPE>

is a package name
J<< ja;
はパッケージ名
>>

=item C<$obj>

is a blessed reference or a string containing a package name
J<< ja;
はブレスされたリファレンスかパッケージ名を含んだ文字列
>>

=item C<CLASS>

is a package name
J<< ja;
はパッケージ名
>>

=item C<VAL>

is any of the above or an unblessed reference
J<< ja;
上のいずれかかブレスされていないリファレンス
>>

=back

When used as an instance or class method (C<< $obj->isa( TYPE ) >>),
C<isa> returns I<true> if $obj is blessed into package C<TYPE> or
inherits from package C<TYPE>.
J<<<< ja;
インスタンス若しくはクラスメソッド (C<< $obj->isa( TYPE ) >>)として
使うときは $obj がパッケージ C<TYPE> 若しくはパッケージ C<TYPE> 
の派生にブレスされているときに I<真> を返します. 
>>>>

When used as a class method (C<< CLASS->isa( TYPE ) >>, sometimes
referred to as a static method), C<isa> returns I<true> if C<CLASS>
inherits from (or is itself) the name of the package C<TYPE> or
inherits from package C<TYPE>.
J<<<< ja;
クラスメソッド  (C<< CLASS->isa( TYPE ) >>: スタティックメソッドとして
参照されることもあります)として使う時は C<CLASS> がパッケージ名 
C<TYPE> 若しくはパッケージ C<TYPE> の派生から派生している(若しくは
そのもの)の時に I<真> を返します. 
>>>>

If you're not sure what you have (the C<VAL> case), wrap the method call in an
C<eval> block to catch the exception if C<VAL> is undefined.
J<< ja;
もし調べたい対象が何であるのかはっきりしていないとき(C<VAL>のケース)では, 
C<VAL> が未定義のときの例外を捕捉するために, メソッド呼び出しを 
C<eval> で包む必要があります. 
>>

If you want to be sure that you're calling C<isa> as a method, not a class,
check the invocant with C<blessed> from L<Scalar::Util> first:
J<< ja;
C<isa> をクラスではなくメソッド呼び出しであることを保証したいのであれば
最初に L<Scalar::Util> の C<blessed> で呼び出しを確認します:
>>

  use Scalar::Util 'blessed';

  if ( blessed( $obj ) && $obj->isa("Some::Class") {
      ...
  }

=item C<< $obj->DOES( ROLE ) >>

=item C<< CLASS->DOES( ROLE ) >>

C<DOES> checks if the object or class performs the role C<ROLE>.  A role is a
named group of specific behavior (often methods of particular names and
signatures), similar to a class, but not necessarily a complete class by
itself.  For example, logging or serialization may be roles.
J<< ja;
C<DOES> はオブジェクト若しくはクラスが役割 C<ROLE> として機能するかどうかを
調べます. 役割(role)とは特定の振る舞いに名前を付けたグループです(
しばしば特定の名前やシグニチャを持ったメソッドです), クラスと似て
いますが, それ自体が完全なクラスである必要はありません. 例えば, 
logging や serialization は役割になるでしょう. 
>>

C<DOES> and C<isa> are similar, in that if either is true, you know that the
object or class on which you call the method can perform specific behavior.
However, C<DOES> is different from C<isa> in that it does not care I<how> the
invocant performs the operations, merely that it does.  (C<isa> of course
mandates an inheritance relationship.  Other relationships include aggregation,
delegation, and mocking.)
J<< ja;
C<DOES> と C<isa> はどちらも, 真であればメソッドを呼び出したオブジェクト
若しくはクラスが特定の振る舞いを行えるかどうかを知ることが
出来るという点で似ています. しかしながら, C<DOES> は 呼び出し先が操作を
どのように処理するかには気にしないで, 単にそれを行うということを調べるに
すぎないという点で C<isa> とは異なります. (C<isa> はもちろん
関連の継承を委任しています. 他の関連には集約(aggregation), 
委譲(delegation), mock が含まれます.)
>>

By default, classes in Perl only perform the C<UNIVERSAL> role.  To mark that
your own classes perform other roles, override C<DOES> appropriately.
J<< ja;
デフォルトでは, Perl のクラスは C<UNIVERSAL> ロールとして機能するだけです. 
自分のクラスで他のロールの機能をマークするには, C<DOES> を適切に
オーバーライドします. 
>>

There is a relationship between roles and classes, as each class implies the
existence of a role of the same name.  There is also a relationship between
inheritance and roles, in that a subclass that inherits from an ancestor class
implicitly performs any roles its parent performs.  Thus you can use C<DOES> in
place of C<isa> safely, as it will return true in all places where C<isa> will
return true (provided that any overridden C<DOES> I<and> C<isa> methods behave
appropriately).
J<< ja;
ロールとクラスの間には, 各クラスは暗にその同じ名前のロールが存在するという
関連があります. 継承トロールには, 基底クラスから派生したサブクラスは
暗黙にその親の機能する任意のロールは機能するという点も関連があります. 
それ故に C<isa> が真を返す全ての場所で C<DOES> は真を返すので(オーバー
ライドされた C<DOES> I<及び> C<isa> メソッドは適切に振る舞うため), 
安全に C<isa> の代わりに C<DOES> を使うことが出来ます, 
>>

=item C<< $obj->can( METHOD ) >>

=item C<< CLASS->can( METHOD ) >>

=item C<< eval { VAL->can( METHOD ) } >>

C<can> checks if the object or class has a method called C<METHOD>. If it does,
then it returns a reference to the sub.  If it does not, then it returns
I<undef>.  This includes methods inherited or imported by C<$obj>, C<CLASS>, or
C<VAL>.
J<< ja;
C<can> はオブジェクト若しくはクラスが C<METHOD> というメソッドを
持っているかを調べます. もし持っていれば関数リファレンスが返されます. 
もし持っていなければ I<undef> が返されます. これには C<$obj>, 
C<CLASS>, 若しくは C<VAL> で継承されている若しくはインポートされている
メソッドが含まれます. 
>>

C<can> cannot know whether an object will be able to provide a method through
AUTOLOAD (unless the object's class has overriden C<can> appropriately), so a
return value of I<undef> does not necessarily mean the object will not be able
to handle the method call. To get around this some module authors use a forward
declaration (see L<perlsub>) for methods they will handle via AUTOLOAD. For
such 'dummy' subs, C<can> will still return a code reference, which, when
called, will fall through to the AUTOLOAD. If no suitable AUTOLOAD is provided,
calling the coderef will cause an error.
J<< ja;
C<can> はオブジェクトが(オブジェクトのクラスが C<can> を適切にオーバー
ライドしていないのであれば) AUTOLOAD を通してメソッドを提供可能かどうかは
知ることができません, そのため I<undef> が返ってきてもオブジェクトが
そのメソッド呼び出しを処理することができないとは限りません. これを
回避するにはモジュールの作者が AUTOLOAD を使って処理するメソッドに対して
前方宣言を使うことです(L<perlsub>参照). そのような'ダミー'の関数は
C<can> はコードリファレンスを返しますが, それが呼び出された時には
AUTOLOAD へとフォールスルーされます. もし適切な AUTOLOAD が提供されて
いなければ, コードリファレンスの呼び出しはエラーになるでしょう. 
>>

You may call C<can> as a class (static) method or an object method.
J<< ja;
C<can> はクラス(スタティック)メソッド, オブジェクトメソッドとして
呼び出すことができます.
>>

Again, the same rule about having a valid invocant applies -- use an C<eval>
block or C<blessed> if you need to be extra paranoid.
J<< ja;
繰り返しますが, 有効な呼び出しのためには同じルールがつかわれます -- 
C<eval> ブロックかよりこだわるのであれば C<blessed> を使う必要が
あります. 
>>

=item C<VERSION ( [ REQUIRE ] )>

C<VERSION> will return the value of the variable C<$VERSION> in the
package the object is blessed into. If C<REQUIRE> is given then
it will do a comparison and die if the package version is not
greater than or equal to C<REQUIRE>.
J<< ja;
C<VERISON> はオブジェクトがブレスされているパッケージの変数 
C<$VERSION> の値を返します. もし C<REQUIRE> が与えられていた
場合には比較をおコアってパッケージのバージョンが C<REQUIRE>
以上でなかった場合には die します. 
>>

C<VERSION> can be called as either a class (static) method or an object
method.
J<< ja;
C<VERSION> はクラス(スタティック)メソッド若しくはオブジェクトメソッド
として呼び出すことができます. 
>>

=back

=head1 EXPORTS

None by default.
J<< ja;
デフォルトでは何もエクスポートされません. 
>>

You may request the import of three functions (C<isa>, C<can>, and C<VERSION>),
however it is usually harmful to do so.  Please don't do this in new code.
J<< ja;
３つの関数(C<isa>, C<can>, そして C<VERSION>)をインポートしたいかも
しれませんが, それを行うことはたいてい有害なことです. 新しいコードでは
それは行わないでください. 
>>

For example, previous versions of this documentation suggested using C<isa> as
a function to determine the type of a reference:
J<< ja;
例えば, このドキュメントの以前のバージョンではリファレンスの
種類を調べるのに C<isa> を関数として使うことを提案していました:
>>

  use UNIVERSAL 'isa';

  $yes = isa $h, "HASH";
  $yes = isa "Foo", "Bar";

The problem is that this code will I<never> call an overridden C<isa> method in
any class.  Instead, use C<reftype> from L<Scalar::Util> for the first case:
J<< ja;
この時, このコードは他のクラスでオーバーライドされた C<isa> 
メソッドを呼び出すI<ことがない>という問題があります. 
１つめのケースについては代わりに L<Scalar::Util> の C<reftype> を
使うようにしてください. 
>>

  use Scalar::Util 'reftype';

  $yes = reftype( $h ) eq "HASH";

and the method form of C<isa> for the second:
J<< ja;
そして２番目のケースについてはメソッド形式の C<isa> を使うように
してください. 
>>

  $yes = Foo->isa("Bar");

=head1 TRANSALTE TO JAPANESE
J<< ja;和訳 >>

 山科 氷魚 (YAMASHINA Hio) <hio@hio.jp>

Origlnal distribution is perl VERSION 5.9.4.
Translated at 2007-03-19.
J<< ja;
原典: perl VERSION 5.9.4.
翻訳日: 2007-03-19.
>>


=cut