Current Path :
/
usr
/
lib64
/
perl5
/
vendor_perl
/
DateTime
/
Or
Select Your Path :
Upload File :
New :
File
Dir
//usr/lib64/perl5/vendor_perl/DateTime/Helpers.pm
package DateTime::Helpers; { $DateTime::Helpers::VERSION = '1.01'; } use strict; use warnings; use Scalar::Util (); sub can { my $object = shift; my $method = shift; return unless Scalar::Util::blessed($object); return $object->can($method); } sub isa { my $object = shift; my $method = shift; return unless Scalar::Util::blessed($object); return $object->isa($method); } 1;
