A terser way to display versions for modules used in tests

[perl/modules/Variable-Magic.git] / t / 30-scalar.t

diff --git a/t/30-scalar.t b/t/30-scalar.t
index f6faea4ea1eaf27f79b839ec542f4b4f18a2e7eb..ab20ed6450dc5f3e2406232011fe47a1d6837d12 100644 (file)
--- a/t/30-scalar.t
+++ b/t/30-scalar.t
@@ -112,7 +112,7 @@ SKIP: {
  }
 
  skip $SKIP => 3 if $SKIP;
- diag "Using Tie::Array $Tie::Array::VERSION" if defined $Tie::Array::VERSION;
+ defined and diag "Using Tie::Array $_" for $Tie::Array::VERSION;
 
  tie my @a, 'Tie::StdArray';
  $a[0] = $$;