Make "assertion" attribute code and test conditional

p4raw-id: //depot/perl@23827

1 files changed, 3 insertions, 2 deletions

diff --git a/t/op/attrs.t b/t/op/attrs.t
index dc91438d0a..2169e3cd7c 100644
--- a/t/op/attrs.t
+++ b/t/op/attrs.t
@@ -8,7 +8,7 @@ BEGIN {
     require './test.pl';
 }
 
-plan tests => 95;
+plan 'no_plan';
 
 $SIG{__WARN__} = sub { die @_ };
 
@@ -147,7 +147,8 @@ eval 'my $$foo : bar = 1';
 like $@, qr/Can't declare scalar dereference in my/;
 
 
-my @code = qw(assertion lvalue locked method);
+my @code = qw(lvalue locked method);
+unshift @code, 'assertion' if $] >= 5.009;
 my @other = qw(shared unique);
 my %valid;
 $valid{CODE} = {map {$_ => 1} @code};