Add information about Scalar::Util::blessed.
Jarkko Hietaniemi [Tue, 1 May 2001 18:39:10 +0000 (18:39 +0000)]
p4raw-id: //depot/perl@9934

pod/perlobj.pod

index 7d7eee5..e466dc7 100644 (file)
@@ -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