X-Git-Url: http://git.shadowcat.co.uk/gitweb/gitweb.cgi?a=blobdiff_plain;f=lib%2FSafe%2FIsa.pm;h=7501499e99c3ee3b63f4e60d4e093aba43c57078;hb=f94f3bbba588d9471418d639d69014f094c1b121;hp=0495cccb98c46b1c7266a8ad7c8e8ac1a885213b;hpb=4703f64cbe034ffe6e326ca165c6fb8238664be4;p=p5sagit%2FSafe-Isa.git diff --git a/lib/Safe/Isa.pm b/lib/Safe/Isa.pm index 0495ccc..7501499 100644 --- a/lib/Safe/Isa.pm +++ b/lib/Safe/Isa.pm @@ -3,9 +3,9 @@ package Safe::Isa; use strict; use warnings FATAL => 'all'; use Scalar::Util qw(blessed); -use base qw(Exporter); +use Exporter 5.57 qw(import); -our $VERSION = '1.000001'; +our $VERSION = '1.000003'; our @EXPORT = qw($_call_if_object $_isa $_can $_does $_DOES); @@ -103,6 +103,11 @@ is equivalent to } }; +Note that we don't handle trying class names, because many things are valid +class names that you might not want to treat as one (like say "Matt") - the +C function from L is a good way to check for +something you might be able to call methods on if you want to do that. + =head1 EXPORTS =head2 $_isa