diff options
author | Gurusamy Sarathy <gsar@cpan.org> | 2000-02-23 09:10:43 +0000 |
---|---|---|
committer | Gurusamy Sarathy <gsar@cpan.org> | 2000-02-23 09:10:43 +0000 |
commit | dd629d5bb3bd7014585b7aad3c6715a5011673bc (patch) | |
tree | e160968eff81a4d95db6304329581b20778209b0 /t/comp | |
parent | c737447429a83c6d1354c19959048bc7751d6936 (diff) | |
download | perl-dd629d5bb3bd7014585b7aad3c6715a5011673bc.tar.gz |
per Larry's idea, parse 1.2.3 as v1.2.3; C<require 5.6.0> and
C<use 5.6.0> work as well; underscores are now permitted in v-strings
p4raw-id: //depot/perl@5220
Diffstat (limited to 't/comp')
-rwxr-xr-x | t/comp/require.t | 6 |
1 files changed, 3 insertions, 3 deletions
diff --git a/t/comp/require.t b/t/comp/require.t index cd97c55eda..efce899edc 100755 --- a/t/comp/require.t +++ b/t/comp/require.t @@ -47,7 +47,7 @@ eval { require v5.5.630; }; print "# $@\nnot " if $@; print "ok ",$i++,"\n"; -eval { require v10.0.2; }; +eval { require 10.0.2; }; print "# $@\nnot " unless $@ =~ /^Perl v10\.0\.2 required/; print "ok ",$i++,"\n"; @@ -55,7 +55,7 @@ eval q{ use v5.5.630; }; print "# $@\nnot " if $@; print "ok ",$i++,"\n"; -eval q{ use v10.0.2; }; +eval q{ use 10.0.2; }; print "# $@\nnot " unless $@ =~ /^Perl v10\.0\.2 required/; print "ok ",$i++,"\n"; @@ -75,7 +75,7 @@ eval { require $ver; }; print "# $@\nnot " unless $@ =~ /^Perl v10\.0\.20 required/; print "ok ",$i++,"\n"; -print "not " unless v5.5.1 gt v5.5; +print "not " unless 5.5.1 gt v5.5; print "ok ",$i++,"\n"; { |