No dor in maint.

p4raw-id: //depot/perl@20639

diff --git a/ext/Safe/t/safeops.t b/ext/Safe/t/safeops.t
index 285e978..525ee97 100644 (file)
--- a/ext/Safe/t/safeops.t
+++ b/ext/Safe/t/safeops.t
@@ -41,6 +41,7 @@ close $fh;
 sub testop {
     my ($op, $opname, $code) = @_;
     pass("$op : skipped") and return if $code =~ /^SKIP/;
+    pass("$op : skipped") if $code =~ m://: && $] < 5.009;
     my $c = new Safe;
     $c->deny_only($op);
     $c->reval($code);