Remaining nit in the deparsing of reversed foreach loops

[p5sagit/p5-mst-13.2.git] / ext / B / t / stash.t

diff --git a/ext/B/t/stash.t b/ext/B/t/stash.t
index 99f96fe..873e484 100755 (executable)
--- a/ext/B/t/stash.t
+++ b/ext/B/t/stash.t
@@ -73,6 +73,8 @@ $got = "@got";
 
 my $expected = "attributes Carp Carp::Heavy DB Exporter Exporter::Heavy Internals main Regexp utf8 version warnings";
 
+$expected =~ s/version // if $] < 5.009;
+
 {
     no strict 'vars';
     use vars '$OS2::is_aout';