Lines Matching refs:VERSION
31 $Alice::VERSION = 2.718;
41 our $VERSION = 1.667;
116 test $a->can("VERSION");
121 test (eval { $a->VERSION }) == 2.718;
123 test ! (eval { $a->VERSION(2.719) }) &&
126 test (eval { $a->VERSION(2.718) }) && ! $@;
132 test $subs eq "can import isa VERSION";
134 test $subs eq "VERSION can import isa";
155 test $sub2 eq "can import isa VERSION";
157 test $sub2 eq "VERSION can import isa";
171 use UNIVERSAL qw( isa can VERSION );
175 main::test VERSION "UNIVERSAL" ;