diff options
author | Jarkko Hietaniemi <jhi@iki.fi> | 2001-05-01 18:39:10 +0000 |
---|---|---|
committer | Jarkko Hietaniemi <jhi@iki.fi> | 2001-05-01 18:39:10 +0000 |
commit | b32b0a5d97553a28be45508a0e60a97b2bf53203 (patch) | |
tree | 7e79295bacd89ffdd09629e9f9d26f2c43347f2d /pod/perlobj.pod | |
parent | 3189d65a81e5869a7ba75fe52949ef916f5017e9 (diff) | |
download | perl-b32b0a5d97553a28be45508a0e60a97b2bf53203.tar.gz |
Add information about Scalar::Util::blessed.
p4raw-id: //depot/perl@9934
Diffstat (limited to 'pod/perlobj.pod')
-rw-r--r-- | pod/perlobj.pod | 9 |
1 files changed, 9 insertions, 0 deletions
diff --git a/pod/perlobj.pod b/pod/perlobj.pod index 7d7eee55a8..e466dc7dd7 100644 --- a/pod/perlobj.pod +++ b/pod/perlobj.pod @@ -387,6 +387,15 @@ blessed object print "It's still an object\n" if UNIVERSAL::can($val, 'can'); +You can also use the C<blessed> function of Scalar::Util: + + use Scalar::Util 'blessed'; + + my $blessing = blessed $suspected_object; + +C<blessed> returns the name of the package the argument has been +blessed into, or C<undef>. + =item VERSION( [NEED] ) C<VERSION> returns the version number of the class (package). If the |