diff options
Diffstat (limited to 'Master/tlpkg/tlperl/lib/UNIVERSAL.pm')
-rw-r--r-- | Master/tlpkg/tlperl/lib/UNIVERSAL.pm | 14 |
1 files changed, 9 insertions, 5 deletions
diff --git a/Master/tlpkg/tlperl/lib/UNIVERSAL.pm b/Master/tlpkg/tlperl/lib/UNIVERSAL.pm index d66d4c5598c..1adf09c2722 100644 --- a/Master/tlpkg/tlperl/lib/UNIVERSAL.pm +++ b/Master/tlpkg/tlperl/lib/UNIVERSAL.pm @@ -1,6 +1,6 @@ package UNIVERSAL; -our $VERSION = '1.08'; +our $VERSION = '1.11'; # UNIVERSAL should not contain any extra subs/methods beyond those # that it exists to define. The use of Exporter below is a historical @@ -103,7 +103,7 @@ check the invocand with C<blessed> from L<Scalar::Util> first: use Scalar::Util 'blessed'; - if ( blessed( $obj ) && $obj->isa("Some::Class") { + if ( blessed( $obj ) && $obj->isa("Some::Class") ) { ... } @@ -165,9 +165,13 @@ block or C<blessed> if you need to be extra paranoid. 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>. Both C<$VERSION> or C<REQUIRE> -must be "lax" version numbers (as defined by the L<version> module) -or C<VERSION> will die with an error. +greater than or equal to C<REQUIRE>, or if either C<$VERSION> or C<REQUIRE> +is not a "lax" version number (as defined by the L<version> module). + +The return from C<VERSION> will actually be the stringified version object +using the package C<$VERSION> scalar, which is guaranteed to be equivalent +but may not be precisely the contents of the C<$VERSION> scalar. If you want +the actual contents of C<$VERSION>, use C<$CLASS::VERSION> instead. C<VERSION> can be called as either a class (static) method or an object method. |